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LUIDKEELS MEEDENKEN 





Het begon een paar maanden geleden als een proefballon. De re- 
dactie van Personal Computer Magazine wilde uitzoeken of er be- 
hoefte was aan een gedegen blad speciaal voor Commodore- 
gebruikers. 

En of daar behoefte aan bestond! 

Het al bijna legendarische ‘nul-nummer’ is inmiddels uitverkocht. 
Dat heeft natuurlijk voor een deel te maken met een eenvoudig re- 
kensommetije. Zelfs op de zwarte markt zijn een database en een 
spreadsheet méér waard dan een tientje. Maar dat moet ook te ma- 
ken hebben met de impact van dat allereerste Commodore Dossier. 
Blijkbaar heeft de redactie van PCM de spijker aardig op de kop 
geslagen en de Commodore-gebruiker recht in het hart gesproken. 
Dat neemt niet weg dat er wel degelijk commentaar was op dat 
eerste nummer. Dat mocht ondergetekende aan den lijve ondervin- 
den toen hij als nieuw ingelijfd redactielid het veld werd ingestuurd 
voor Commodore Dossier. 

Toolkits, utilities en peeks en pokes viogen me al snel om de oren. 
Op gebruikersdagen werd luidkeels meegedacht over de koers die 
het blad moest gaan varen. Elk telefoontje leverde een nieuwe free 
lance medewerker op. Overbelaste bestuursleden van gebruikers- 
groepen maakten kostbare avonden vrij. De bereidwilligheid om 
mee te denken was zo nadrukkelijk aanwezig, dat het bijna niet an- 


REPORTAGES 


HET BEGINT MEESTAL 
ALS EEN HOBBY 


Vier professionals aan het woord. Een stripschrijver en leraar, een paragnost, een 


verzekeringsman en een impressario leggen uit waarom hun Commodore onmis- 


ders kan worden uitgelegd dan verkapte kritiek op het lange uitblij- 
ven van een vervolgnummer. 

We zijn inderdaad over heel wat nachten ijs gegaan en daar hebben 
we onze redenen voor. Wie de Nederlandse en Belgische 
Commodore-gebruiker van praktische en nuttige informatie wil 
voorzien, moet van goede huize komen. Het niveau is hoog in die 
kringen. Wij kunnen het weten, want we hebben de mogelijkheid om 
het Nederlandse materiaal te vergelijken met het materiaal dat ons 
via onze Engelse, Amerikaanse en Spaanse zusterbladen wordt 
aangeboden. Om een voorbeeld te noemen: voor het ontwerpen van 
een eigen  controle-getal-programma (dat is hogeschool- 
programmeren) hoefden we niet naar het buitenland uit te wijken. 
Onze eigen Peter de Zeeuw leverde een juweeltje af. En een heel 
eigen checksum staat natuurlijk een stuk eleganter dan de zoveelste 
aangepaste versie van Compute’s Gazette. 

Bij het bedienen van de gevorderden mogen we de beginners echter 
niet vergeten. Volgens hardnekkige geruchten schijnen er 
Commodore-bezitters te zijn bij wie de computer werkeloos in de 
kast staat omdat ze gewoon niet lekker op gang komen. Haast on- 
voorstelbaar gezien de meeslepende en ondersteunende activitei- 
ten van de verschillende gebruikersgroepen. Deze mensen raken 
met het verschijnen van Commodore Dossier hun smoesjes kwijt. 
Stof en roest krijgen geen kans meer, want naast het toetsenbord 
van de Commodore-computer ligt voortaan het Commodore Dos- 
sier. Vier keer per jaar een verse en voor de abonnees bovendien 
maandelijks een actuele bijlage. U krijgt het druk, als het aan ons 
ligt. En dat niet alleen met het intikken van listings van programma’s 
die u toch moet hebben. 

Een blad is zo goed als zijn lezers. Zonder uw reacties, bijdragen en 
vondsten kunnen we niet functioneren zoals we dat willen. We reke- 
nen er op dat u met ons blijft meedenken. 


MAT HEFFELS 


baar is voor hun werk. Tegelijkertijd geven ze tips en programmatuur waarmee de 


lezer zijn voordeel kan doen. 


PAGINA Ss 


HET FIINSTE UUR 
VAN DE WEEK 


Een reportage over het informatica-onderwijs aan de Johannes Post Mavo in 
Hoorn. Leraren, leerlingen en ouders biijken enthousiast. Maar er zijn ook kriti- 
sche geluiden. 


VWRAAG ’T COMMODORE 

Als niemand je kan helpen, biedt de zogenaamde support-groep van Commodore 
Nederland uitkomst. De technische afdeling van de Nederlandse vestiging vertelt 
een paar sterke staaltjes en geeft bovendien enkele gouden tips. 
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PRODUKT-INFORMATIE 


NIEMAND KAN ZONDER 
EEN PRINTER 
Commodore Dossier onderzoekt de printer-markt. De populairste printers worden 
vergeleken en beoordeeld. Wat kost het eventueel extra om ze aan de praat te 
krijgen. Hoe ziet het letterbeeld er uit. 

PAGINA®@& 


PLUS/4 


Jan Jacobs bekeek de ingebouwde software van de nieuwe Plus/4. Hij is redelijk 
tevreden maar niet echt dol-enthousiast. 
Paaina GS 





SS 


WORDT RILJK, 
WORDT SPELONTWERPER 
In het eerste deel van de cursus wordt al meteen duidelijk gemaakt dat het ont- 
werpen van een computer-spel eigentijk best wel meevalt. Er kan al meteen 
gespeeld worden. 

PAGINA 16 


HEEL VOORZICHTIG 
Dirk H. Ringenoidus geeft aanwijzingen voor het onderhoud van uw computer. Hoe 
voorkomt u problemen. En treden er toch storingen op dan kunt u die aan de 
hand van dit artikel — heel voorzichtig — zelf verhelpen. 

pacina G@ 


OOK IN DIT NUMMER 


PROGRAMMATUUR 

SNELLE TEKSTVERWERKER van Luc Volders Pagina 51 
BELASTINGPROGRAMMA van Edwin Kuné Pagina 71 

En verder onder meer: eigen controle-programma, sprite editor, professioneel bio- 
ritme, toto-prognose enzovoort, enzovoort. 


EN VERDER ONDER MEER 
NATIONALE SPEL TOP TIEN. (Pagina 24) Met onder meer een tip hoe u een gro- 
ter beginkapitaal kunt krijgen bij het spelen van nummer één, Ghostbusters. 
NETSPANNING. (Pagina 79) Hoe verovert u de huiskamer-televisie ap uw huisge: 
noten? Een praktisch programma voor wie (nog) geen aparte monitor heeft. 
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6. Brieven. Reacties van lezers. 61. Boeken. 
8. Vier professionals aan het woord. 63. Plus/4 en zijn software. 
16. Cursus spel-ontwerpen deel I. 64. Heel voorzichtig! Onderhoud en re- 
23. Wedstrijd voor spel-ontwerpers. paratie. 
COMMODORE 24. Nationale Spel Top Tien. 71. Belastingprogramma om zelf in te 
DOSSIER AK TIEF 27. Produkt informatie. De populairste tikken. 
Het aktuele katern dat maandelijks naar de abonnees wordt opgestuurd, wordt elk printers nader bekeken. 78, Vertikt. 
kwartaal ook opgenomen in Commodore Dossier. In dat AKTIEF-katern de vaste | 35. Commodore Dossier Aktief. 79. Netspanning. 


tubrieken Nieuws, Tips & Trucs, Listings van Lezers, Aktief Programma’s, Service |51. Tekstverwerker om zelf in te tikken. 81. Vraag t Commodore. 
en CD Markt. 58. Reportage Johannes Post Mavo. 82. Volgende maand, volgend kwariaal. 
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VOOR AL UW SERVICE NAAR .... 
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Cursus? 


Zonde van het geld? U besteedt liever talloze 
uren om het Zelf uit te zoeken? Wij doen het be- 
ter. Onze cursussen vergen siechts één tot enke- 
le dagen. 


Laat u nu inschrijven voor één van de (nieuwe) 
introductie-cursussen: 


TEKSTVERWERKING 
PERSONAL COMPUTER 


Alsmede de pakket-cursussen: 
WORDSTAR 
MAILMERGE 
CONDOR-3 
LOTUS 1, 2,3 
dBASE Ii 
MULTI PLAN 
CROMIX 
MS-DOS 





Vraag inlichtingen bij 
Techn, Bureau Viaskamp 
Opleidingen B.V 

Postbus 571 

3130 AN Vlaardingen 
Telefoon 010-358011 
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ZEGEN 

Vooreerst wou ik u van harte 
feliciteren met het nieuwe 
Commodore Dossier. Sinds ik 
het eerste nummer heb ver- 
slonden, heb ik mij dan ook 
onmiddellijk gemeld als pio- 
nierabonnee. Ik veronderstel 
dat in dit nummer wel een 
plaatsje zal zijn voor vragen 
van Commodore fanaten. 

1) Hoe komt het toch dat van 
de 64 K RAM er slechts 39 
overblijven voor BASIC, als zo- 
wel de Kernal, de BASIC en 
de karakters in ROM vertoe- 
ven. Waarom wordt de inhoud 
van ROM integraal in RAM ge- 
kopieerd, ten koste van kost- 
baar geheugen? 

2) Kunt u in het kort aangeven 
hoe ik aan de BASIC extra 
commando’s kan toevoegen? 
3) Is het mogelijk een pro- 
gramma vanuit BASIC te laden 
en daarna direct te RUNnen? 


Mogen de Goden U en Uw na- 
zaten overvioedig zegenen in- 
dien u in staat blijke deze vra- 
gen te beantwoorden. 

Grootaert Werner, Gent (Belgie) 


1) De Commodore 64 gebruikt, 
zoals bekend, de 6502 micro- 
processor. Deze processor kan 
maximaal naar 64 Kbyte ge- 
heugen ‘kijken’, men zegt dat 
het adres bereik 64 K is. Dat 
is met kunst- en vliegwerk wel 
uit te breiden, maar in de 
CBM 64 hebben de ontwer- 
pers dat niet gedaan. Het om- 
schakelen van ROM naar 
RAM-geheugen is een moei- 
zaam proces en in de praktijk 
blijkt dat het vaak veel sneller 
is om de noodzakelijke 
systeemsottware (karakters, 
Kernal, BASIC) maar direct in 
RAM te laden als het systeem 
wordt opgestart. Je kunt ech- 
ter, als je in machinetaal pro- 
grammeert, de BASIC-interpre- 
ter met een welgerichte POKE 
(zie de reference-guide) ’weg- 








Reacties op Commodore Dossier en CD Aktief zijn natuurlijk altijd welkom. 


Alle aero krijgen antwoord, maar niet alle brieven kunnen worden geplaatst 
in deze rubriek. Alleen vragen of opmerkingen die voor andere lezers ook interessant 
zijn, komen voor plaatsing in aanmerking. De redactie kan brieven inkorten bij 


ruimtegebrek. 


Uw reacties graag naar: Commodore Dossier, Rijnsburgstraat 11, 












gooien’. En wanneer je zelfs 
de ingebouwde Kernal routines 
van de 64 niet wilt gebruiken 
(wat af te raden is) kun je wel 
volledig gebruik maken van 
het gehele RAM-geheugen. De 
beschikbaarheid van de karak- 
ters in RAM heeft overigens 
als groot voordeel dat je zelf 
heel gemakkelijk eigen tekens 
kunt ontwerpen, zodat je een 
eigen karakterset kunt ge- 
bruiken. 


2) De gemakkelijkste manier 
om extra BASIC-commando’s 
toe te voegen aan de 
standaard-BASIC is het ge- 
bruik van een zogeheten ‘wig’. 
Voordat je hieraan begint is de 
reference guide ook een on- 
misbaar hulpmiddel. 

Wat gebeurt er als er de 
BASIC-interpreter een com- 
mando gaat uitvoeren? Aller- 
eerst kijkt de interpreter of 
voor een regel op het scherm 
een regelnummer staat. Als 
dat niet het geval is, wordt de 
BASIC-instructie in de ‘direct 
mode’ uitgevoerd. Wanneer de 
BASIC een regelnummer ziet, 
wordt de betreffende rege! in 
het geheugen, vanaf locatie 
2048, opgeslagen. Het pro- 
gramma wordt in dat geval 
met een RUN-commando 
geactiveerd. 

De truc van een wig is nu dat 
je de BASIC-interpreter eerst 
omleidt naar een eigen 
machinetaal-routine. Daarvoor 
moet de BASIC-inleesroutine, 
die in het onderste gedeelte 
van het geheugen staat, voor- 
zien worden van een sprong- 
instructie wanneer een be- 
paald karakter wordt herkend, 
bijvoorbeeld een **". 

Dat sterretje kan onder meer 
staan voor een zelfgemaakte 
instructie als 'automatische re- 
gelnummering’. 

Wanneer de eigen routine 
doorlopen is, spring je weer te- 
rug naar de normale BASIC- 
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invoerroutine. Dit is een sum- 
miere uitleg, maar het toevoe- 
gen van systeemcommando’s 
is dan ook geen sinecure. 
Een grondige kennis van de 
systeemprogramma’s is nood- 
zakelijk, lees hiervoor bijvoor- 
beeld de bekende Data — 
Becker boeken over de Com- 
modore 64. 


3) Wanneer het een normaal 
BASIC-programma betreft, 
kunt u met de constructie 

10 LOAD” FILENAME",.8 

20 RUN 

een programma wel degelijk in 
het geheugen krijgen en 
runnen. 


TUSSENOPDRACHT 

Als 60-jarige laatstarter schafte 
ik mij kortgeleden een Com- 
modore 64 aan. In de eerste 
aflevering van Commodore 
Dossier trof ik een listing aan 
van het programma ‘sprites’. 
Gaarne zou ik weten of de 
reeks decimale getallen ook 
nog met een tussenopdracht 
op het scherm kan worden af- 
gebeeld, zodat je kunt zien 
wat er mee gebeurt? 

M. Geldof, Brasschaat (Belgie) 


Vanzelfsprekend kunt u door 
het PRINTen van variabelen in 
het programma tussentijds re- 
sultaten bekijken. In feite doen 
veel programmeurs dat tijdens 
het ‘ontluizen’ van hun pro- 
gramma’s. In het geval van de 
sprite listing in nummer 1 kunt 
u in regel 1390 de variabele A 
gewoon aidrukken in deze 
vorm: 


1390 SPRITE(TEL- 
LER,HULP) = A:PRINTA; 


De punt-komma voorkomt dat 
de variabele het ‘scherm af- 
rolt’, U kunt vanzelfsprekend 
in regel 1540 ook BYTE(T + 1) 
laten afdrukken. 


SCHERMKLEUR 

Bij spelletjes zie je vaak dat 
de achtergrond van het 
scherm ook wordt gebruikt. Ik 
kan echter met BASIC- 
programma’s alleen maar in 
het kleinere venster werken, 
dat voortdurend donkerblauw 
blijft. Is het ook mogelijk dit te 
veranderen? 


In principe kun je het hele 
scherm van de Commodore 
van kleur doen veranderen,dit 
wordt geregeld in geheugenlo- 
katies 58280 en 53281. Wan- 
neer u daar een cijfer van 0 
tot en met 15 in POKEt, veran- 
dert de kleur van het scherm, 
en ook van de achtergrond. 
De benodigde kleurcodes 
staan in het Commodore- 
handboek op pagina 159. 


ENKELZIDIG 

DUBBEL GEBRUIKT 

Ik heb een vraag over disket- 
tes. Je hebt enkelzijdige en 
dubbelzijdige diskettes. Nu 
heb ik gehoord dat veel men- 
sen deze enkelzijdige diskettes 
dubbelzijdig gebruiken (door 
met een perforator een extra 
gaatje bij te knippen). De een 
zegt dat het niet uitmaakt, de 
ander zegt dat het slecht is 
voor de diskettes en weer een 
ander zegt dat het slechts is 
voor de disk-drive zelf. De an- 
dere kant van de diskette zou 
namelijk niet gepolijst zijn en 
dit zou schade toebrengen aan 
de disk-kop, Kunt u uitkomst 
brengen? 

R. van Sonsbeek, Rotterdam 


Het maakt hoegenaamd niets 
uit of u dubbelzijdige of enkel- 
zijdige schijfjes gebruikt wan- 
neer het aankomt op eventuele 
schade aan de disk-drive. Wat 
is namelijk het geval? Enkelzij- 
dige schijfjes zijn door een ge- 
brek aan een zijde niet door 
de controle voor dubbeizijdige 





schijfjes heengekomen. Hoe- 
wel de schijfjes fysiek dus in 
niets van elkaar verschillen, 
kan de fabrikant geen garantie 
geven voor de kwaliteit van de 
niet-goedgekeurde tweede Zij- 
de. Het verdient dus aanbeve- 
ling deze niet te gebruiken 
vor de boekhouding van de 
voetbalclub, 


SNELLERE DRIVE 

Ik heb plannen om een disk- 
drive bij mijn Commodore 64 
aan te schaffen, maar ik weet 
niet welke. Ik hoor iedereen 
steeds klagen over de traag- 
heid van de 1541. Nu schijnt 
er inmiddels een 1542 te zijn. 
Kan ik die op mijn Commodore 
64 aansluiten en is hij sneller 
en/of beter? Zijn er mogelijk 
nog andere diskdrives die ik 
op mijn computer zou kunnen 
aansluiten. 

Stewart Boot, Utrecht 


In vergelijking met andere 
diskdrives mag de 1541 dan 
wel traag zijn, in vergelijking 
met een cassetterecorder is er 
natuurlijk wel sprake van be- 
langrijke tijdwinst. Een echt al- 
ternatief is er trouwens niet. 
De 1542 komt inderdaad bin- 
nenkort uit, maar die is be- 
doeld voor de Plus/4. Dat be- 
tekent dat hij alleen via een in- 
terface is aan te sluiten. Dat 
geldt tegelijk voor alle andere 
alternatieven voor de 1541, zo- 
als de SFD-1001 een snelle 
drive van Commodore die in 
Duitsland al leverbaar schijnt 
te zijn. Overigens zijn de schij- 
ven van de 1541 niet uitwissel- 
baar met schijven van de alter- 
natieve drives. 
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é De — over de professionele kwaliteiten van computers als de Commodore 64 en 
a x de Vic 20 lopen nogal uiteen. Voor de een is 
; a LN aj maakt tussen een huiscomputer en een pro- 
fessionele computer. Maar hoe groot is het verschil tussen het elektronisch bijhouden 
le computers alleen maar of zijn ze met een beperkt budget tot vergeliikbare prestaties / 
te aig Voor de professionele gebruikers die in de volgende interviews aan het 
letterlijk en figuurlijk leren lezen en schrijven met hun Commodore. Zij delen hun ervaringen en de kneepjes van het vak met 
de lezers van Commodore Dossier. 


een computer een computer, voor de ander 

moet er een a verschil worden ge- 
van een huishoudboekje en een professioneel administratief programma? Kun je op een 
en dezelfde machine een spel ontwerpen en spelen? Imiteren huiscomputers professione- 
woord Komen, spelen die vragen al lang niet meer. a are er niet over om hun Commodores in te ruilen voor een ‘zwaat- 
der’ system. Leraar en schrijver Van Die, paragnost Hoendervangers, verzekeringsman De Reus en impressario Buys hebben 
OVER SJORS EN SJIMMIE, MARIO BEEN EN EEN 
GEBRUIKSBOEK VOOR DE COMMODORE 





Zo heeft Jan veel gegevens verzameld om- 
trent de kindertelefoon, een onderwerp dat 
zich dankbaar leent voor gebruik op een 
strippagina. Ook zal de fanatieke striplezer 
niet ontgaan zijn, dat Jan van Die en zijn 
collega veel schrijven over computerge- 
bruik op school. Dat Sjors en Sjimmie een 
heel ander gebruik van dat apparaat voor 
ogen hebben dan de leraar, zal binnenkort 
in weer een nieuw album te lezen zijn. 
Maar ook het honderden keren spelen van 
Pacman en andere computer-spellen le- 
vert Jan inspiratie op voor zijn strippro- 
dukties. 

"We zijn nu met een programma bezig, 
waarmee we een computerspelletje met 
Sjors en Sjimmie willen ontwerpen. Het is 
alleen zo, dat je met een gewone huis- tuin- 
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Het zal de kenners niet ontgaan zijn dat 


de huiscomputer vaak een rol speelt in de 
strip van Sjors en Sjimmie. Logisch, want 
een van de schrijvers van die strip zit een 
Gee deel van de dag achter zijn compu- 


er. Jan van Die is niet alleen schrijver, 


maar ook leraar, computerfanaat en onder 


meer medewerker van Commodore Dos- 
sier. Toen zijn school afbrandde, had hij 
even tijd voor een gesprek. 


> ’'lk was een van de allereerste computer- 


bezitters, toen ik jaren geleden mijn Vic 20 
aanschafte,”’ zegt Jan van Die. ’’Het is een 
leuke hobby, ik heb er veel aardigheid in, 
maar inmiddels is het bezit van zo’n appa- 
raat wel een noodzaak geworden. Ik ken 
de chips in mijn eigen hoofd namelijk wel 
een beetje, dat is een geheugen als een 
zeef, en vooral voor het vastleggen van in- 
formatie blijkt de computer een uitkomst.” 
Van Die geeft burgerinformatica aan de 
Rotterdamse Roncalli-mavo, die vlak voor 


het bezoek van Commodore Dossier ten 
prooi viel aan de viammen, maar schrijft 
daarnaast al jaren -negen stripalbums lang 
om exact te zijn - teksten voor de succes- 
volle strip Sjors en Sjimmie van uitgeverij 
Oberon. 

“Ik heb meer dan vierhonderd compu- 
terspelleties verzameld in de loop van de 
tijd. Maar dat is allang niet meer het enige 
waarvoor ik mijn Commodore 64 gebruik 
Voor die Sjors en Sjimmie-strip moeten we 
namelijk veel onderwerpen paraat hebben, 
die we eventueel kunnen gebruiken voor 
een aflevering. 

Als ik nu iets leuks tegenkom in de krant of 
op de televisie, maak ik direct een aanteke- 
ning daarvan in mijn Superbase data- 
bestand. Ik heb een geheugen als gen 
zeef, vertelde ik je al, en voor het maken 
van die strip is het echt heel belangrijk dat 
ik al die nieuwtjes en aardigheidjes die ik 
tegenkom goed gerangschikt ergens in op- 
geslagen heb. Daarvoor dient dus onder 
andere mijn C 64.”’ 


en keukencomputer nog steeds niet echt 
professioneel kunt tekenen. We moeten 
daarom wel uitgaan van standaard afbeel- 
dingen, bijvoorbeeld de kolonel die op een 
Stoel in de tuin zit. De stripfiguurtjes kun- 
nen, als het programma eenmaal af is, wel 
simpele bewegingen maken, zoals iets op- 
pakken of laten vallen, maar echt flexibel 
zijn ze nog niet. Belangrijk is echter, dat we 
zelf veel lol hebben in het werken aan dit 
spelletje. We hebben geen enkele preten- 
tie met de produktie van dit computerspel 
maar als het scenario eenmaal gereed is, 
zullen we niet aarzelen ermee naar een uit- 
gever te stappen. We zijn er per slot van re- 
kening wel op uit, om een volwassen pro- 
dukt te maken.” 


MARIO BEEN 
Maar er zit nog meer in Van Die’s ‘truken- 
doos’, zoals hij zijn Commodore 64 betitelt. 
Zo gebruikt hij het pakketje Easyscript - 
“als je het mij vraagt een van de prettigste 
tekstverwerkingsprogramma’s 
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Commodore 64” — voor artikelen die hij 
nu en dan schrijft voor het stripblad Eppo. 
Zo moest hij laatst nog een interview ma- 
ken met Spielmacher Mario Been van het 
Rotterdamse Feijenoord. Ook voor dat 
soort klussen zit Jan lang en graag achter 
de Commodore. 

"Ik doe al zo’n tijd ervaring op met dat ap- 
paraat, dat ik samen met Lucien Volders 
een boek heb samengesteld waarin we alle 
tips en trucs die ons ter ore kwamen maar 
eens hebben gebundeld,”’ vertelt de on- 
derwijskracht. Kluwer bleek de geinteres- 
seerde uitgeverij voor dit produkt, waarin 
op 180 bladzijden evenzovele gebrui- 
kerstips voor de gevorderde computeraar 
worden gegeven. Het gaat waarschijnlijk 
’Praktijkboek voor de Commodore 64’ he- 
ten, en zal alle ervaring bevatten die Jan 
en zijn collega Lucien in de loop van de ja- 
ren hebben opgedaan. 


BUSKRUIT 

"We hebben geprobeerd alle tips en trucs, 
die zo’n beetje gemeengoed zijn geworden 
van alle gebruikersclubs in Nederland, op 
een rijtje te zetten. Vanzelfsprekend heb- 
ben we er veel adviezen met betrekking tot 
beveiliging van programma’s ingegooid. 
Voor de beginnende Commodore-gebrui- 
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ker betekent het, dat hij een hoop dingen 
niet meer zelf hoeft te ontdekken. Het bus- 
kruit hoeft niet nog eens uitgevonden te 
worden.” 

Er staan bijvoorbeeld handelingen in die 
een gemiddelde gebruiker met een stan- 
daard Commodore-configuratie niet voor 
elkaar kan krijgen. "We hebben een aantal 
manieren beschreven - ook de listings 
daarvoor staan in het boek — om program- 
ma’s in elkaar te schuiven. Zo kun je twee 
programma’s laden, en terwijl je met het 
ene programma werkt, gebruik maken van 
de informatie die in het andere programma 
opgesiagen zit. Programma’s mengen, 
gaat ook, door het leggen van de juiste ver- 
bindingen. Stel, je hebt in een bepaald pro- 
gramma de commando’s genummerd van 
100 tot 2000. Maar regel 1123 en regel 914 
wil je eruit hebben, om ze te kunnen wijzi- 
gen en aanpassen aan een verbeterde ver- 
sie van het programma. Dan geven wij 
daarvoor de juiste adviezen, gebaseerd op 
praktijkervaringen.”’ 


SORTEREN 

In Jan’s boek ook vele tips om gegevens 
op verschillende manieren te sorteren. 
"Als je namen en adressen van personen 
opsiaat, moet je dat bestand op meer ma- 
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nieren kunnen gebruiken en raadplegen. Ik 
geef zelf les in de eerste en tweede klas, 
en weet dus dat als Pietje de beurt heeft, 
hij vast en zeker aan Jantje, die de volgen- 
de beurt heeft, zal vertellen wat de ant- 
woorden zijn op de vragen die hij gemaakt 
heeft. Met de sorteermethoden die wij in 
dat boek weergeven, is het mogelijk een 
groot aantal gegevens, in dit geval vragen 
voor de leerling, door elkaar te husselen 
zodat voorzeggen niet meer mogelijk is.” 


SCHOOLPRAKTIJK 
Van de tips die Van Die en co in hun boek 
beschrijven, maakt Jan ook dankbaar ge- 
bruik in zijn lespraktijk. "'Officieel is onze 
school nog niet eens benoemd als experi- 
menteerschool. En al waren we dat wel, 
dan is er nog weinig goede software voor 
het onderwijs voorhanden, zodat we wel 
gedwongen worden veel zelf te improvise- 
ren. In een lessenserie laat ik de leerlingen 
eerst wennen aan het gebruik van de Com- 
modore, waarvan er zes in de klas staan. 
Weten ze eenmaal hoe ze een tekst aan 
moeten maken, en hoe gegevens op te 
zoeken in een bestand, dan kunnen ze een 
direct-mail brief voor hun medeleerlingen 
schrijven. Ze maken dus een programma, 
waarmee de tekst die ze ingevoerd heb- 
ben, gekoppeld kan worden aan het adres- 
senbestand van de leerlingen in de Klas. 
Een aardigheidje voor als ze uitnodigingen 
voor een verjaardag moeten versturen, 
maar ook uiterst leerzaam als methode om 
de computer te leren kennen. Je moet ze 
het gevoel geven dat ze iets nuttigs kun- 
nen doen. De tips die we in dat boekje be- 
schreven hebben, gebruiken we dan ook 
zelf met groot plezier.” 


Drie tips uit het boek van Jan van Die 
vindt u in Commodore Dossier Aktief, 
midden in dit blad. <« 


LUIS ZIT IN REGEL 3817 


Toon Hoendervangers kan niet ontken- 
nen dat zijn helderziendheid af en toe ont- 
zettend handig is. Vooral bij het pore 
meren. Zoals die keer dat een stem hem 
waarschuwde voor een opener 
in regel 381. Die luis had al drie nachten 
slaap gekost. 


® Toon Hoendervangers (28) is paragnost. 


Hij praktiseert in het Brabantse Lierop. 
Duizenden patiénten weten jaarlijks dat 
goedverstopte gehucht viak onder Eindho- 
ven te vinden. Ze worden door Hoender- 
vangers van hun kwalen en kwaaltjes ver- 
lost door handoplegging, behandeling met 
geneeskrachtige stenen, een kruidenre- 
cept of een advies, gebaseerd op hun per- 
soonlijke horoscoop of bioritme. 

Toon is ook Commodore-fanaat. Begonnen 


met een gewone Commodore 64, kocht hij & 
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> al snel een SX64, want hij pakt de zaken 
graag grondig aan. 
Over Hoendervangers kwaliteiten als ge- 
bedsgenezer en helderziende hebben we 
ons geen oordeel gevormd, maar van zijn 
capaciteiten als computer-programmeur 
moeten we ons niet al te veel voorstellen. 
"Ik heb er niet te veul verstand van,"’ zegt 
hij in een smakelijk Brabantse tongval, 
“maar ik ben wel een doordouwer en ik 
weet precies wat ik wil.” 
Blijkbaar werkt de combinatie van hard- 
nekkigheid en enthousiasme net zo goed 
als deskundigheid, want Hoendervangers 
is een heel eind gekomen met zijn Commo- 
dore. Hij kan voor zijn werk in elk geval niet 
meer zonder. 


KAARTENBAK 
WERD TE KLEIN 
Hoendervangers praat gemakkelijk en on- 
derhoudend, hij neemt er de tijd voor. "Ik 
heb nooit zo veel opgehad met computers. 
Ze passen in een wereldbeeld waar ik niet 
zo kapot van ben. Dat idee begon pas te 
veranderen toen mijn vader gepensioneerd 
werd en zich een P-2000 van Philips aan- 
schafte. Binnen de kortste keren was die 
man verslingerd aan zijn apparaat. Vol- 
gens hem was dat nu net wat voor mij. Ik 
was toen — nu zo’n drie jaar geleden — 
net met m’n praktijk gestart en ik kon de 
drukte al vrij snel niet meer aan. Voor ruim 
duizend patiénten heb je al een flinke kaar- 
tenbak nodig en als je dan ook nog hun 
klachten en behandelingswijzen wil docu- 
menteren, ben je meer met administratie 
bezig dan met de praktijk. Volgens mijn va 
der was een computer daar goed voor. De 
deskundigen in de diverse computershops 
in Eindhoven waren dat met hem eens. 
Maar als ik aangaf wat ik met de aan te 
schaffen computer wilde — mevrouw Jans- 
sen belt op, ik druk op de knop en ploep, 
daar staat mevrouw Janssen met haar 
klachten en therapie op het scherm — dan 
bleek dat ik met die eisen toch meer moest 
denken aan een systeem van enkele tien- 
duizenden guldens. En die had ik gewoon 
niet.” 

Uiteindelijk koos Toon Hoendervangers 
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voor de Commodore 64. Die was te betalen 
en bovendien beweerde de verkoper dat 
Toon er precies mee zou kunnen wat hij 
wilde. In plaats van een data-recorder 
moest hij een schijfeenheid aanschaffen. 
Toon: ’’Dat klopte dus niet. Als ik een pa- 
tiént aan de ijn had, moest ik eerst het pro- 
gramma en alle gegevens laden en dan 
pas kwam op het scherm wat ik weten 
moest. Van snelladers en dat soort dingen 
had ik nog nooit gehoord.”’ 

Toon schafte een antwoordapparaat aan 
en ging op zoek naar een handzame oplos- 
sing voor zijn probleem. Met behulp van 
een leraar van de TH in Eindhoven en de 
stemmen in zijn hoofd werd een heel aar- 
dig bestandsprogramma in elkaar gezet. 
Na verloop van tijd deed dat programma 
wat het moest doen, maar nog niet zo snel 
als Toon het graag wilde. 

“De oplossing daarvoor kwam in zicht op 
een computerdag in Venlo. Daar maakte ik 
kennis met Cor Brink van de gebruikers- 
groep Hot News. Ik was zo onder de indruk 
van de capaciteiten van de man, dat ik ook 
maar lid van zijn club werd. Dat heeft me 
geen windeieren gelegd. Op die dag 
hoorde ik het eerst van E-proms. insteek- 
modulen die het programma rechtstreeks 
naar het geheugen doorprikken. Op zo’n 
E-prom kunnen maximaal 30 blocks aan 
programmatuur. Ons bestandsprogramma 
was echter 36 blocks. Geen probleem: Cor 
Brink rommelde wat met het programma 
en toen bleek het keurig te passen. Een 
oplossing.” 


SCHAMPER 
GELACH 

"Die E-proms vond ik toch een uitvinding. 
Toen ik dan ook een teksiverwerker oni- 
dekte wilde ik die ook meteen op E-prom. 
Met die tekstverwerker kon ik eindelijk al- 
les doen wat ik wilde: een receptje uitdraai- 
en, een afdruk van een horoscoop of biorit- 
me maken, brieven schrijven, noem maar 
op. Maar toen ik duidelijk maakte dat ik 
dat pakket dat ik op het oog had op E-prom 
wilde, werd ik hartelijk uitgelachen. Zelfs 
door Cor Brink. !k had gezien dat het kon. 
Maar volgens Cor Brink kon ik zien wat ik 
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wilde, dit was volgens hem ten ene male 
onmogelijk. Ik zei al dat ik een doordouwer 
ben, dus ik bleef aan zijn hoofd zeuren. 
Plak dan gewoon twee chips op elkaar, zei 
ik. Een schamper gelach was het ani- 
woord.” 

"En toch kreeg ik gelijk, of beter: de stem- 
men in mijn hoofd kregen gelijk. Brink 
kreeg het uiteindelijk voor elkaar, Heb ik al 
gezegd dat die man geniaal is? En hoe luk- 
te het nou? Juist ja, door twee chips op el- 
kaar te plakken, leiterlijk dus, en die om 
beurten te activeren.”” 


COMPUTER LEVERT 
HET BEWIJS 

De SX64 is voor Toon Hoendervangers 
een onmisbaar stuk gereedschap gewor- 
den, ’’Niet dat ik er beter door werk. Mijn 
helderziendheid, helderhorendheid en ge- 
neeskracht vormen een gave. De kracht 
van liefde noem ik dat. Het gaat vanzelf en 
ik word er niet eens moe van. Maar dank zij 
de computer kan ik de mensen heel wat ef- 
ficiénter behandelen. Het trekken van een 
horoscoop bijvoorbeeld duurt zeker 6 uur 
met de hand. Mijn Commodore klaart het 
karwei in 20 seconden. Vroeger kon je tij- 
dens een consult van een half uur eigenlijk 
alleen maar praten. Tegenwoordig lever ik 
in dat half uur een horoscoop, een biorit- 
me, ik werk met stenen, leg de hand op en 
als het nodig is krijgen de mensen ook nog 
een gedrukt recept mee.”’ 
"Ik kan me voorstellen dat programmeurs 
waiertanden als ze horen van stemmen die 
waarschuwen tegen iuizen. Maar het ligt 
niet zo simpel als ik het nu misschien voor- 
stel. Ik heb al gezegd dat het een gave is, 
een positieve kracht, die ik alleen maar ten 
goede kan aanwenden. Bijvoorbeeld: als ik 
op weg ben naar een patiént en ik rijd 160, 
dan word ik wel gewaarschuwd voor poli- 
tiecontrole. Maar als ik voor eigen plezier 
over 's lands wegen scheur, dan moet ik 
dokken als ieder ander.” 

“Wel ben ik er met behulp van de compu- 
ter in geslaagd mijn vader te overtuigen 
van mijn gave. Dat is nogal een nuchtere 
man die niet graag zomaar iets aanneemt. 
|k heb toen voorgesteld dat ik de willekeuri- 
ge getallen zou raden die de computer op- 
geeft via het programmaatije op een van de 
eerste bladzijden van het handboek. Het 
lukte omdat het kiaarblijkelijk goed was de 
man te overtuigen.” 

En dan, alsof hij onze gedachten kan ra- 
den: "Ik heb dat daarna ook niet meer ge- 
daan, ik heb geen zin me voortdurend te 
bewijzen.” <4 


in Commodore Dossier Aktief, midden in 
dit blad, plaatsen we een uitvoerig 
Bioritme-programma dat door Toon 
Hoendervangers ter beschikking werd 
gesteld. 
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ANDRe HAZES EN BZN SAMEN 
IN VOLENDAMSE COMMODORE 


Werd in het verleden in Volendam de 
kiem gele d voor een muzikale traditie die 
de palingdorpers beroemdheid tot ver over 
onze grenzen bracht, in deze jaren is het 
ook de computer die de Volendammers in 
zijn ban houdt. Centrale punt in deze tur- 
ree gebeurtenissen: Artiestenburo Vo- 
endam. 


m Er staan drie Commodores 64, plus een 
CBM dual disk drive opgesteld in het pand 
waar Artiestenburo Volendam annex video- 
verhuurbedrijf behuisd is. Net als Jan Buys 
(‘de man die The Cats groot heeft gemaakt’) 
een eerste vraag wil beantwoorden, komt 
een dame binnen met een videocassette die 
ze vast en zeker niet voor haar kindertjes ge- 
huurd had. Het meisje achter de balie drukt 
enkele toetsen in, de vrouw krijgt een nieu- 
we set videoplezier en in een mum van tijd 
heeft ze het pand alweer verlaten. 


Buys steekt van wal. We gebruiken die 
Commodores hier voor verschillende doe- 
leinden, zoals je ziet. Er zitten nu zo’n 2500 
videocassettes opgesiagen in het systeem, 
let wel, gesorteerd op VHS en Betamax, 
want ook in de videohandel is standaardi- 
satie nog geen vast gegeven. Van negen 
uur ’s ochtends tot laat in de avond wordt 
er een Commodore continu gebruikt voor 
dat onderdeel van de shop.” 

Daarnaast staat de telefoon bijna de hele 
tiid roodgloeiend, want er zijn honderden, 
zo niet duizenden verenigingen die voor 
hun personeelsavondje of jubilea een kin- 





dervoorstelling, dansgroep, dan wel Lee 
Towers himself willen contracteren. 


WHISKY 

"Het zou echt een onbegonnen zaak zijn, 
die tent hier te runnen zonder die Commo- 
dores. lemand belt om te vragen of we een 
aanvullend programma kunnen regelen 
voor een partijtje, dan moet ik direct over 
een aantal gegevens beschikken. Wan- 
neer is André Hazes beschikbaar, wat voor 
soort artiest wil de klant, een man of een 
hele band, wat is het honorarium, schoon 
of met alle extra kosten er nog bij. Moet er 
voor extra geluidsinstallaties gezorgd wor- 
den, wil de artiest veertig broodjes of twee 
flessen whisky in zijn kileedkamer hebben. 
Dat soort gegevens is nu in enkele secon- 
den opvraagbaar.”’ 

Voordat de Commodores geinstalleerd wa- 
ren, moest er heel wat zoek- en papierwerk 
verricht worden, voor de clienten over de 
gevraagde gegevens konden beschikken. 
Als een poststaking tenminste niet verhin- 
derde dat er informatie verstrekt kon wor- 
den. Zo is het maken van een uitdraai met 
alle bijzonderheden van de gevraagde ar- 
tiest nu beperkt tot een paar simpele han- 
delingen, waardoor de beschikbare gege- 
vens snel voorhanden zijn. 

Alvorens men echter daadwerkelijk aan de 
slag kon gaan met de Commodores, moest 
er een pasklaar programma komen. Een 
standaard stukje software bleek niet de 
ideale oplossing, vanwege de specifieke 
eisen die het artiestenbedrijf nu eenmaal 
stelt. De man die voor de Volendammer 
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programmatuur tekent, is Evert Jan Rei- 
lingh uit Edam. Deze ‘gesjeesde artiest’ 
zoals hij zichzelf betitelt (vanwege een hitje 
dat hem in een grijs verleden via bemidde- 
ling van Peter Koelewijn een plaats op de 
Franse hitparades bezorgde) was dag en 
nacht in touw om het artiestenburo van de 
geschikte programmatuur te voorzien. 

"Ik had al een tijdje een home-computer, de 
Vic 20. Zodra de mensen in je omgeving dat 
weten, ben je al gauw de computerexpert, 
die voor dat soort klusjes ingeschakeld 
wordt. Ik gebruikte de Vic 20 voornamelijk 
voor mijn hobby als zendamateur, met na- 
me om boodschappen ook in de ASCll-code 
te ontvangen en te verzenden.” 


BESTANDS- 
OPBOUW 

Met een vriend begon Reilingh program- 
ma’s in elkaar te draaien voor het ar- 
tiestenburo. ‘Het was echt niet zo moeilijk 
iets te maken waarmee ze uit de voeien 
konden. We moesten echier wel rekening 
houden met de opbouw van het bestand, 
want zowel de artiesten, als de zaalhou- 
ders en de tentverhuurbedrijven moesten 
er een plaatsije in krijgen. Ze wilden name- 
lijk af van dat zoekwerk in archiefladen, 
wat nu eenmaal nodig is om een goede of- 
ferte voor je cliéntele te kunnen samenstel- 
len. Dat is ons aardig gelukt, het systeem 
draait al een jaar tot volle tevredenheid van 
degenen die ermee werken.” 

Het programma voor het artiestenburo 
neemt momenteel 34K in beslag, hoewel 
getracht is de menu-opbouw zo eenvoudig 
mogelijk te houden. : 
Jan Buys: ’’We wisten wel dat er veel gea- 
vanceerder apparatuur op de markt was, 
apparatuur die zich in principe beter leent 
voor gebruik door meer personen. Maar de 
investering zou dan aanzienlijk groter ge- 
weest zijn, en ons budget overschrijden. 
Daarom hebben we gekozen voor drie 
Commodores met aparte programma’s 
voor het artiestenburo en de videotheek, 
zodat toch gescheiden gewerkt kon wor- 
den. Mochten er nog meer uitbreidingen 
noodzakelijk zijn, wat ik niet direct geloof 
want alles draait nu lekker, dan hebben we 
altiid genoeg geheugenruimte om ook dat 
voor elkaar ie krijgen.” 

Volendam werd groot in de muziekwereld 
door steeds tijdig in te springen op de 
nieuwste ontwikkelingen. '’Wij hoeven nu 
niet zo nodig uit onze voegen te groeien. 
Maar als je een bedrijf hebt waar je 
constant gestoord wordt in je werk door 
een rinkelende telefoon, moet je wel zien 
dat elke vrije seconde benut kan worden. 
Om bij te kunnen blijven in deze business 
moeten we dus wel de meest efficiente 
hulpmiddelen gaan gebruiken. Die hebben 
we gevonden in onze Commodores,” zo 
besluit Jacob Buys. <4 
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DE VERZEKERINGSWERELD KAN ZIJN 
COMMODORE TERUGVERDIENEN 


Voor administratieve werkzaamheden met 


een computer denkt men al gauw aan 
systemen die tienduizenden guidens 


kosten. Dat het ook anders kan, blijkt uit 


een en dat Commodore Dossier had 
met D. de Reus uit Krommenie. Hij heeft 
een zeer compleet assurantieprogramma 
eschreven, dat assuradeurs een hoop 
ijdrovend werk uit handen kan nemen. 


& Computers zijn uitgevonden omdat men- 


sen er genoeg van kregen om steeds maar 
weer dezelfde rekenkundige en admi- 
nistratieve handelingen te verrichten. Deze 
vaak eentonige karweitjes worden nu een- 
maal met een enorme snelheid door de 
computer afgehandeld, zodat wij onze tijd 
aan nuttiger bezigheden kunnen besteden. 
Ook in de verzekeringswereld is men zeer 
veel tijd kwijt aan alle administratieve 
rompslomp. 

De assurantietussenpersonen, die bemid- 
delen tussen de verzekerden en de grote 
verzekeringsmaatschappijen, zijn vaak ve- 
le dagen bezig met eentonige administra- 
tieve klussen, zoals het schrijven van no- 
ta’s en dergelijke. 


"Tien jaar geleden, toen ik statistisch werk 
deed, kwam ik voor het eerst in aanraking 
met microcomputers,” zegt D. de Reus, 
programma-analist, wiens vader een klein 
assurantiekantoor heeft. Ik kocht een op 
de 2Z80 microprocessor gebaseerde 
zelfbouw-computer, waarop ik de eerste 
beginselen van het programmeren heb ge- 
leerd. Op mijn werk begon ik steeds meer 
met computers te werken, wat op een ge- 
geven moment zelfs resulteerde in een vol- 
ledige baan op de computer-afdeling. We 





werken daar met een grote IBM mainframe 
(de 4341) en met de IBM PC.” 

De Reus had vorig jaar een gesprek met 
zijn vader over al dat eentonige administra- 
tieve werk dat hij moet verrichten. "Ik 
kreeg hem zover dat hij een Commodore 
64, een 1541 diskdrive en een printertje 
aanschafte. In een paar weken tijd heb ik 
toen een klein programma in elkaar ge- 
draaid, zodat mijn vader (die nog nooit eer- 
der met computers had gewerkt) snel zijn 
nota’s kon uitprinten. Dat bespaarde hem 
al gauw twee dagen werk per maand!”’ 
Toch was dit pas de eerste stap op weg 
naar een compleet pakket assurantie- 
programmatuur. 

De Reus: ’’Uiteraard was er in die eerste 
fase niet echt sprake van een uitgebreid en 
gebruikersvriendelijk programma. Maar 
omdat mijn vader er erg enthousiast over 
was, ben ik eraan blijven werken. Inmid- 
dels is het programma uitgegroeid tot een 
compleet pakket, speciaal geschreven 
voor mensen die absoluut geen verstand 
van computers hebben.” 


Commodore Dossier: ‘Is de capaciteit 
van de Commodore 64 niet wat klein 
voor een dergelijk pakket?”’ . 

De Reus: "’Dat valt erg mee. Uiteraard kan 
je niet de resultaten van een systeem van 
30.000° gulden verwachten, maar de in- 
vestering in apparatuur en programmatuur 
ligt dan ook een heel stuk lager. Het is zelfs 
zo dat een assuradeur die dit pakket ge- 
bruikt de aanschafkosten binnen een half 
jaar heeft terugverdiend. En de capaciteit 
van het programma is voor de kleine verze- 
keringsagentschappen, en zelfs voor de 
meeste middelgrote, ruim voldoende. Per 
diskette kan men zeshonderd klanten met 
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elk zes polissen kwijt. Bovendien is de soft- 
ware zo geschreven dat er zeer snel aan- 
passingen gemaakt kunnen worden als dat 
nodig mocht blijken.” 


Het pakket van de heer de Reus is zo gea- 
vanceerd dat een aantal programma- 
uitgevers belangstelling heeft getoond. In- 
middels zijn de onderhandelingen af- 
gerond. 


De Reus: ’’Het pakket wordt door Wincom 
in Etten-Leur op de markt gebracht. Daar- 
naast is er voor verzekeringsagenten ook 
de mogelijkheid instructiedagen te krijgen 
of een service-contract af te sluiten. Boven- 
dien is er sprake van een ‘turn-key’- 
project: de klant kan een compleet pakket 
bestellen, dus inclusief computer en rand- 
apparatuur. Desgewenst wordt alles voor 
hem aangesloten en wordt hij geholpen 
met het invoeren van zijn klantenbestan- 
den. Allemaal heel gebruikersvriendelijk 
dus.” 

Over gebruikersgemak van programma- 
tuur heeft De Reus nog wel wat meer te 
vertellen: 

Ik kocht laatst een programma om disket- 
tes te kopiéren, zodat ik makkelijk back- 
ups van klantenbestanden kon maken. 
Hoewel ik toch wel met computers kan om- 
gaan, heb ik flink wat moeite met dat pro- 
gramma gehad, omdat de instructies abso- 
luut niet klopten en het programmma in het 
begin absoluut niet deed wat ik ervan ver- 
langde. Over gebruikersvriendelijkheid 
gesproken...”’ 


Commodore Dossier: ’’Dit programma is 
nu af. Bent u al weer met iets anders be- 
zig?” 

De Reus: ’’ Niet echt. Ik ben wat kleine pro- 
gramma’s aan het schrijven, ook op admi- 
nistratief en berekenings-gebied. Boven- 
dien begin ik nu pas te beseffen hoeveel 
mogelijkheden de CBM 64 biedt. Het is 
mijns inziens de meest veelzijdige compu- 
ter in zijn prijsklasse. En een diskdrive zo- 
als de 1541, voor onder de 900 gulden met 
een opsiagcapaciteit van 170K is ook 
uniek!”’ 


Commodore Dossier: *’Heeft U tenslotte 
nog een programmeertip voor onze le- 
zers?” 

De Reus: "Ja. Blijf gestructureerd pro- 
grammeren, Als u aan een groot program- 
ma werkt, test dan eerst alle kleine onder- 
delen van dat programma uit en pas ze dan 
ineen. Op die manier is mijn assurantie- 
pakket ook tot stand gekomen.” 


(Voor meer inlichtingen over het software- 
pakket: tel. 01608 - 35 759) < 
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CURSUS SPEL ONTWERPEN, DEEL 1 


WORDT RIJK, WORDT 


Computerspellen ontwerpen kan meer zijn dan een aantrekkelijke hobby. Een aantal 
en peer is er stinkend rik van geworden, ondanks het illegale 
opiéren. Er komt in feite niet méér voor kijken dan fantasie en vindingrijkheid, uit- 
houdingsvermogen en wat basis-technieken. Die basis-technieken worden u door Jan 
Jacobs bijgebracht in een cursus van vier afleveringen. De auteur zelf moet overi- 
gens nog gewoon werken voor de kost. 





tie 1024 tot 2024, de waarde die een kla- 
vertje weergeeft worden gePOKEt. Daar- 
naast moet in het beeldscherm-kleurenge- 
heugen de waarde '5’ worden gePOKEt op 
de plaats van de klavertjes, wat ze ook in- 
derdaad groen maakt. De regels zien er zo 
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® Menig hobbyist moet bij het spelen van 


‘Decathlon’ of ’Zaxxon’ wel eens hebben 
gedacht: ik zou ook best eens een spelletie 
willen maken. Maar hij verwerpt die ge- 
dachte vrijwel meteen, omdat zoiets hem 
ondoenlijk voorkomt. 

Toch is het schrijven van eenvoudige spel- 
leties voor de Commodore 64 niet zo moei- 
lijk als het lijkt. Natuurlijk: voordat u het 
peil van de professionele programmeurs 
heeft bereikt, zal er heel wat water door de 
Rijn stromen. Hierdoor moet u zich echter 
niet laten weerhouden, want wie eenmaal 
de smaak te pakken heeft, raakt allengs 
onder de indruk van de mogelijkheden van 
relatief goedkope computers. Na de eerste 
aarzelende stappen is de sprong naar 
complexe machinetaal-programma’s veel 
gemakkelijker. 


In deze serie van vier artikelen leert u de 
beginselen van het ontwerpen van spellen. 
Om de toegankelijkheid te vergroten, en de 
grondbeginselen helder uit te leggen, gaan 
we in deze eerste aflevering niet verder 
dan programmeren in Basic. In de volgen- 
de afleveringen zullen we zien hoe door 
het invoeren van korte machinetaalpro- 
grammaatjes spellen sneller, leuker en uit- 
gebreider zijn te maken. Ook gaan we in op 
het ontwerpen van achtergronden door 
middel van zogeheten hires-schermen. 

U zult leren hoe ’exotische’ zaken als ’in- 
terrupts’ en ‘scrolling’ spelletjes snel en le- 
vendig maken. 

Uit de computershop weet u ongetwijfeld 
dat spelletjes niet absurd genoeg kunnen 
zijn, en wij doen daar vrolijk aan mee. De 
bedoeling van het spel dat we gaan ont- 
werpen is om meloenen uit de handen van 
vraatzuchtige roofvogels te houden. U 
moet de meloen met een luchtballon er- 
gens oppikken, en ze daarna op een wa- 
gentje deponeren dat ze afvoert naar veili- 
ger oorden. We noemen het spel dan ook 
toepasselijk: Ballon Meloen (c)’ 


Elk spel is opgebouwd uit een aantal ba- 
sisprincipes, en een aantal daarvan gaan 
we in deze eerste les — nu nog in Basic — 
behandelen: 


* achtergrond 
* bewegende objecten 
* bijhouden van resultaten 


Voorlopig beperken we ons tot de volgen- 
de opzet. Een luchtballon wordt door mid- 
del van de spelpook over het scherm bewo- 
gen. Door een druk op de vuurknop laat de 
speler een meloen uit de ballon vallen, die 
op een bewegend wagentje moet worden 
gegooid. Wanneer dat lukt, krijgt de speler 
een punt, wordt de meloen afgevoerd, en 
begint alles van voor af aan. Drie funda- 
mentele zaken komen hierbij aan bod: 

* een voorwerp dat met een spelpook kan 
worden bewogen 

* voorwerp dat onder een voorwaarde be- 
weegt (vuurknop ingedrukt) 

* yvoorwerp dat voortdurend ‘automatisch’ 
beweegt. 

Daarnaast komt aan de orde hoe je vast 
stelt of de meloen al op de wagen ligt of 
juist ernaast is gevallen. 

Een belangrijk woord vooraf mag hier niet 
achterwege blijven. Zoals met alle goede 
programma’s, moet ook een spelletje, dat 
behoorlijk complex kan worden, logisch 
zijn opgebouwd. Een goed programma is 
opgebouwd uit blokken die elk een bepaal- 
de functie verrichten. Die blokken — bij- 
voorbeeld subroutines — hebben het voor- 
deel dat je ze apart kunt testen en dat ze 
vaker zijn te gebruiken. Wanneer de Basic- 
regels voor, zeg, het bewegen van de me- 
loen door het hele programma verspreid 
zijn, komt zelfs de programmeur er op den 
duur niet meer uit. De ‘hapsnap-stijl’ van 
programmeren - achter de computer 
gaan zitten en maar wat aan rotzooien tot- 
dat het ergens op gaat lijken — leidt altijd 
fot volstrekt ondoorzichtige programma’s. 
Probeer dus altijd in blokken, modulen, te 
denken bij het ontwerpen van een spel. 
Na deze goede raad aan de slag. Nadat we 
het scherm hebben schoongemaakt met 
50 PRINT CHR$(147) 

begint het programma al direct met verwij- 
zing naar een subroutine: 

100 GOSUB 2000. 

In deze subroutine maken we de achter- 
grond voor het spel aan. We zorgen er al- 
lereerst met twee welgerichte POKE’s voor 
dat het scherm en de achtergrond licht- 
blauw van kleur zijn. Daarvoor is de waar- 
de '14’. Daarna maken we een weide met 
groene klavertjes onder in het beeld- 
scherm. Daarvoor zijn twee dingen nodig. 
Allereerst moet in de onderkant van het 
beeldschermgeheugen, dat loopt van loka- 


uit: 

2000 POKE 52380,14:POKE52381,14 
2010 FORT1 = 1784T02023:POKET1, 88: 
NEXTT1 

2020 FORT2 = 56056T056295:POKET2,5: 
NEXTT2 

2030 RETURN 

Intikken van RUN laat zien dat een en an- 
der is gelukt. Met SHIFT/RUN-RESTORE 
en LIST kunnen we weer terug naar waar 
we waren gebleven. 


De volgende regel van het hoofdprogram- 
ma is alweer een sprong naar een sub- 
routine: 

110 GOSUB 5000 

Deze subroutine bevat de gegevens om de 
ballon, de meloen en de wagen op het 
scherm te laten verschijnen. Daarvoor ma- 
ken we, hoe kan het anders bij de Commo- 
dore 64, gebruik van sprites. Het zal be- 
kend zijn dat sprites ’tekeningen” zijn die, 
door het opgeven van een X-waarde en 
een Y-waarde (een horizontale en een ver- 
ticale positie) overal op het scherm kunnen 
worden geplaatst. Daarvoor zorgt een spe- 
ciale chip in de 64. Maar de sprites moeten 
wel eerst worden aangemaakt. Een com- 
plete sprite heeft 63 bytes nodig (een byte 
is een groepje van acht bits, oftewel acht 
enen en nullen) om te worden ‘ingevuld’: 
hij bestaat dan ook uit een rechthoek van 
21 bij 24 beeldpuntjes. Door middel van 
FOR-NEXT lussen en DATA statements 
POKEn we de gegevens voor de sprites in 
het geheugen. Tegelijk kunnen acht spri- 
tes onafhankelijk van elkaar over het 
scherm worden bewogen. Wij gebruiken er 
voorlopig drie. 

Hoe weet de sprite-chip waar de gegevens 
voor een bepaalde sprite liggen opgesla- 
gen? Daarvoor zorgen de geheugenloca- 
ties 2040 tot 2047. Locatie 2040 is voor 
sprite 0, 2041 voor sprite 1, enz. De waarde 
die in deze zogeheten registers wordt ge- 
plaatst, geeft aan in welk geheugenblok 
van 64 bytes lang de informatie voor een 
sprite te vinden is. Als register 2040 dus de 
waarde 13 bevat, betekent dit dat de gege- 
vens voor sprite 0 te vinden zijn vanaf ge- 
heugenplaats 13 * 64 = 832. Wij slaan on- 
ze sprites op in de blokken 13, 14 en 15, 
daarom begint de subroutine 5000 met de 
regel: 

6000 POKE2040,13:POKE2041,14: 
POKE2042,15 
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150 POKE SP +39,2 
151 POKE SP + 40,0 
154 POKESP + 29,1 





decimale getallen 1 en 2. Als we de waarde 
255 zouden POKEn zouden alle sprites 
tal te kiezen, kunnen dus alle mogelijke 
combinaties van sprites worden gekozen. 
De volgende regels: 

gen zwart en de meloen oranje worden. 
Experimenteer gerust met andere kleuren! 
je een sprite, net zoals je hem in SP +21 
aan zet. We willen alleen een vergrote bal- 
lon, dus: 

Voor we nu naar de echte bewegingsrouti- 
nes gaan, moeten we nog wat variabelen 
een waarde meegeven, en wat registers 
van een bepaalde waarde voorzien. Dit 


Door de juiste bitjes *1” te maken vergroot 
wordt verderop vanzelf duidelijk. 


POKEn we 3 in het register: de som van de 
aan staan, tel maar na! Door het juiste ge- 
zorgen ervoor dat de ballon rood, de wa- 
Het aardige van sprites is dat je ze horizon- 
taal en verticaal twee keer zo groot kunt 
maken. Daarvoor dienen de registers 
SP + 23 (horizontaal) en SP + 29 (verticaal). 


152 POKE SP +41,8 
153 POKESP + 23,1 
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zodat we met constructies 


als SP+21 of SP+4 snel bepaalde loka- 





noemen in regel: 


130 SP 








kleur 
53248 




















registers dat de computer allerlei zaken 


over de acht sprites - positie op het 
grootte 
meest linkse nul is sprite 7, de meest recht- 


se sprite 0. Aangezien we sprite 0 en 1 wil- 
len aanzetten, moet het volgende patroon 


In regel 140 zetten we de sprites voor de 
Register SP +21 (53269) bevat voor elke 
sprite een een of een nul, waardoor een 
sprite aan respectievelijk uit staat. De 
in register SP +21 worden geplaatst: 

De onderste cijfers geven aan welke waar- 
de in het gewone getallenstelsel die bits 
vertegenwoordigen. We willen de twee 
meest rechtse bits aan hebben, en daarom 


ballon en het wagentje aan: 


ties kunnen aanduiden. Dat is duidelijker 
140 POKESP +21, 3 


Commodore heeft aan de eerste twee let- 
en spaart veel rekenwerk. 


voor de sprite-chip worden geregeld. Vanaf 
geheugenlocatie 53248 begint een aantal 
dit register voortaan SP (van SPrite, 


scherm 
ters genoeg), 
128 64 32 168421 
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-HENVAR=S 
810 POKESP + 5,PEEK(SP + 5) + 10 


WORDT RIJK, WORDT 
SPELONTWERPERI! 


be 160 POKESP + 1,50 


161 POKESP +3,200 

162 POKESP +5,50 

170 DOB=10 

De variabele DOB komt van DOBbelsieen. 
Dan staat nu alles Klaar voor de regels die 
het feitelijke spel regelen. Deze vallen uit 
een in een aantal blokken: 

1 lees de waarde van de spelpook 

2 beweeg de ballon 

3 beweeg het wagentje 

4 controleer of vuurknop is ingedrukt, zo ja 
roep subroutine 7 

5 controleer of meloen op wagen valt, zo ja 
roep subroutine 9 

6 begin opnieuw vanaf 1 

7 SUBROUTINE: 

laat meloen vallen 

controleer of meloen wagen heeft gemist, 
zo ja roep subroutine 8 

8 SUBROUTINE: 

laat meloen verdwijnen 

9 SUBROUTINE: 

verhoog score en druk deze af 

voer meloen en wagentje af 

zet variabelen terug 

De stand van de spelpook 1 is bepalend 
voor de positie van de ballon, die moeten 
we dus in het eerste blok uitlezen. De 
waarde van geheugenlokatie 56320 hangt 
af van de stand van de spelpook. Normaal 
is deze 127, staat de spelpook naar links 
dan wordt de waarde 123, staat de pook 
naar rechts, dan is hij 119. We maken de 
variabele JOY afhankelijk van lokatie 
56320 en veranderen aan de hand van de 
stand een tellertje S. Deze teller bepaalt de 
horizontale positie van de ballon. Dus: 
200 JOY = PEEK(56320) 

210 IFJOY = 123THENS=S-8 

220 IFJOY = 119THENS=S+8 

230 IFS >255THENS = 255 

240 IFS < 23THENS = 23 

Regels 230 en 240 zorgen ervoor dat S niet 
groter wordt dan 255 en niet kleiner dan 
23, grotere of kleinere getallen mogen niet 
worden gebruikt om de horizontale positie 
van de ballon aan te geven. 

De regel die de ballon beweegf, ziet er reu- 
ze simpel uit: 

300 POKESP,S 

Register SP is voor de horizontale positie 
van sprite 0 (de ballon), register SP +1 
voor de verticale positie, die in regel 160 op 
50 is bepaald. 

Door tijdelijk de regel 310 GOTO200' in te 
voeren zie je dat de ballon met de spelpook 
kan worden bewogen. Deze regel wel weer 
weghalen! 

Het bewegen van het wagentje, sprite 1 
dus, komt nu aan bod. De lokaties waar het 
om gaat zijn SP + 2 (horizontaal) en SP +3 
(verticaal). De verticale positie hebben we 
al op 200 bepaald, de horizontale positie 
maken we afhankelijk van een teller WA 





die wordt opgehoogd met een willekeurig 
getal tussen 10 en 20. Hierdoor heeft het 
wagentje bij elke rit een andere snelheid, 
wat het mikken met de meloen wat moeilij- 
ker maakt. Elke keer als het wagentje een 
rit over het scherm heeft volbracht, wordt 
dus aan de variabele DOB een nieuwe 
waarde toegekend. De allereerste keer is 
DOB gelijk aan 10 (regel 170): 

400 WA=WA+DOB 

410 IFWA>255THENWA =0:DOB = 
INT(RND(1)* 10) + 10 

420 POKESP +2,WA 


Nu het wagentje en de ballon bewegen, 
moeten we eens gaan controleren of de 
vuurknop niet is ingedrukt. Als dat het ge- 
val is moet immers de meloen uit de ballon 
vallen. Hiervoor is het nodig te weten dat 
het indrukken van de vuurknop de waarde 
van een bit in het eerdergenoemde register 
56320 verandert van een 1 naar een 0. De 
waarde van dit register hadden we toege- 
kend aan de variabele JOY. We kijken nu 
met een tweede variabele JOY2 of het be- 
treffende bit 1 dan wel 0 is. Hiervoor ma- 
ken we gebruik van de logische operator 
AND, waarover in een volgende aflevering 
meer: 

500 JOY2=JOYAND16 

510 IFJOY2 = OTHENMELOEN = 1 

520 IFMELOEN = 1THENGOSUB800 

De variable MELOEN, die 1 wordt als de 
vuurknop ihgedrukt is, noemen we een 
viag. In het algemeen gebruik je viaggen 
om iets te onthouden, in dit geval of de 
vuurknop ingedrukt is geweest. Want ook 
als we de vuurknop loslaten, moet de me- 
loen immers gewoon door blijven vallen. 
Pas als de wagen geraakt is of de meloen 
uit beeld verdwijnt, maken de in de die be- 
treffende subroutines de viag MELOEN 
weer 0. Totdat de vuurknop weer wordt in- 
gedrukt, slaat het programma subroutine 
800 gewoon over. 


Subroutine 800 laat de meloen dus vallen. 
Aanvankelijk is de verticale positie van de 
meloen (SP + 5) gelijk aan die van de bal- 
lon (SP +1), dat hebben we in de regels 
160 en 162 vastgelegd. De valbeweging 
van de meloen komt tot stand doordat de 
waarde van SP +5 telkens met 10 wordt 
opgehoogd (onlogisch genoeg is het ge- 
bruikelijk om boven in het beeldscherm 
met tellen te beginnen). Maar er is nog een 
klein probleempje. Als de meloen begint te 
vallen, moet zijn horizontale positie gelijk 
zijn aan die van de ballon. Daarna moet de 
meloen echter, onafhankelijk van de bal- 
lon, recht naar beneden blijven vallen. Dat 
lossen we op door in het begin van de sub- 
routine de horizontale positie van de ballon 
toe te kennen aan de variabele VAR: 

800 IFPEEK(SP + 1) = PEEK(SP +5) 


820 POKESP + 4,VAR 

Als deze subroutine voor de eerste maal 
wordt doorlopen, is de verticale positie van 
de ballon (SP + 1) nog gelijk aan die van de 
meloen (SP +5), zodat VAR gelijk wordt 
aan S, de horizontale positie van de ballon. 
Maar in regel 810 wordt de verticale positie 
van de meloen met 10 opgehoogd: de me- 
loen valt. Daardoor zal in een volgende 
keer dat de subroutine wordt doorlopen 
VAR gewoon gelijk blijven, omdat SP +1 
en SP+5 nu verschillend zijn. Door VAR 
nu aan SP +4 toe te kennen, valt de me- 
loen in een keurige rechte lijn naar bene- 
den, wat de ballon ook doet. 

We moeten de meloen-sprite nog wel aan- 
zetten: 

830 POKESP + 21,7 

En als de meloen aan de onderkant uit het 
beeld verdwenen is, en de wagen dus ken- 
nelijk heeft gemist, moeten we naar een 
andere kleine subroutine springen: 

840 IF PEEK(SP + 5)> 
235THENGOSUBS00 


Als dat niet het geval is springen we ge- 


woon terug: 

850 RETURN 

Subroutine 900 regelt wat ‘administratieve 
zaken’. De meloen wordt uitgezet, zijn ver- 
ticale positie wordt weer gelijk gemaakt 
aan de ballon, en de viag MELOEN wordt 
0 gemaakt: 

900 POKESP + 21,3 

910 POKESP + 5,PEEK(SP + 1) 

920 MELOEN =0 

930 RETURN 


Het enige dat ons nu nog rest in het hoofd- 
programma, is controleren of de meloen 
het wagentje heeft geraakt. Ik hoor u den- 
ken: maar als de meloen aan de onderzijde 
van het scherm uit beeld verdwijnt heeft hij 
toch kennelijk het wagentje niet geraakt, 
waarom moet je dat dan nog eens extra 
controleren? Hiervoor is een aantal rede- 
nen aan te voeren, maar de belangrijkste is 
dat het spel gemakkelijker uit te bouwen is 
wanneer een afzonderlijke botsing-detectie 
wordt toegepast. 


Register SP + 30 houdt voor elke afzonder- 
lijke sprite bij of deze door een andere spri- 
te of door de achtergrond is geraakt, het 
corresponderende bitje wordt dan 1 ge- 
maakt. Wij kijken of het wagentje is geraakt 
(sprite 1), wederom met de AND-functie: 
600 HIT = PEEK(SP + 30)AND2 

610 IFHIT=2THENGOSUB1000 - 

Met andere woorden: als de variabele HIT 
de decimale waarde 2 bevat, is de tweede 
bit van rechts in lokatie SP + 30 kennelijk 1 
geworden. Het wagentje is door de meloen 
geraakt. In subroutine 1000 worden de be- 
nodigde stappen ondernomen. 

Allereerst gaan we een teller SC voor de 
score bijhouden: 

1000 SC=SC+1 
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» waarna het volgende op het beeldscherm 1070 HIT=0:MELOEN=0:WA=0 


programma’s zijn 
te koop bij 0.a.: 


~Allwave 
—Funtronics 


Verder bij vele 


~—computershops 
~kantoorboekhandelaren 
-boekwinkels 


De volgende 
titels zijn 
reeds verschenen: 


COMMODORE 64 


Speurneus 
Bekketrekker 
Ruimtekolonie 
Breukendans 


Kindercomp 
Geheim Archief 
Schildpad 
Koppelkaarten 
Ruimterekenen 
BMX rekencross 


NONODDGINANAD | disk/cass. 


SINCLAIR ZX SPECTRUM 16K/48K 
Woordvanger 6+ | C | £49,- 
Sommenkraker | 6+ |C | f49.- 
APPLE II+-/Ile 


Speurneus 10+ 
Breukendans 8+ 
Kindercomp 





wordt afgedrukt: 

1020 PRINTCHR$(144);""U HEEFT’’;SC, 
”MELOEN(EN) GERED!” 

41030 PRINTCHR$(19):REM cursor terug 
naar beginpositie 


Hierna moet nog een aantal zaken worden 
geregeld: allereerst laten we de meloen en 
het wagentje met een eenvoudige FOR- 
NEXTlus naar links uit het beeldscherm 
rijden: 

1040 FORX = PEEK(SP + 4)TOO STEP-2 
1050 POKESP + 2,X:POKESP + 4,X 

1060 NEXTX 

Hierna moeten we nog de variabelen ME- 
LOEN, WA en HIT 0 maken, de verticale 
positie van de meloen weer gelijk maken 
aan die van de ballon, het botsingsregister 
SP +30 0 maken en de meloen-sprite weer 
uitzetten: 


1080 POKESP +5,PEEK(SP + 1) 
1090 POKESP + 30,0:POKESP + 21,3 
1100 RETURN 


En in regel 700 van het hoofdprogramma 
begint nu alles weer van voor af aan: 
700 GOTO200 

in de volgende aflevering zullen we bekij- 
ken hoe een mooiere achtergrond kan wor- 
den gemaakt, en hoe bepaalde bewegings- 
routines relatief eenvoudig door machine- 
taalprogrammaatjes kunnen worden ver- 
vangen. Bovendien gaan we stoeien met 
de beschikbare geheugenruimte om meer 
sprites - inderdaad: de meloen-etende 
roofvogels — op het scherm te krijgen. 
Het beste advies tot dan is: probeer zelf 
eens wat te veranderen of toe te voegen 
aan het spel. U heeft nu in ieder geval ge- 
zien dat het toch wel meevalt! < 


Fig. 1 Dataregels voor ballon, wagen en meloen. 
Nummer ze bijvoorbeeld 5050, 5060, 5070 enzovoort. 


DATAO,127,0,1,255,192,3,255,224,3,255,224,7,255, 
240,7,255,240,7,255,240 
DATA3,255,224,3,255,224,2,255,160,1,127,64,1,62, 
64,0,156,128,0,156,128 
DATAO,73,0,0,73,0,0,62,0,0,62,0,0,62,0,0,28,0,0,0,0 
DATAO,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 
0,0,0,0,0,0 


DATA128,0,1,128,0,1,255,255,255,255,255,255,255,255, 


255,125,0,125,48,0,48 
DATA48,0,48,0,0,0,0,0,0,0,0,0 
DATAO,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,2,0,0, 


2,0,0 


DATAG,0,0,15,0,0,31,128,0,127,224,0,247,240,0,249,240 


:0,249,240,0 
DATA255,240,0,127,224,0,31,128,0,15,0,0,0,0,0,0,0,0,0 





Op de voorafgaande pagina’s start Jan Ja- 
cobs een cursus voor spel-ontwerpers in 
spe. Zoals u gezien heeft, is de cursus zo 
opgebouwd dat ook beginners zich het vak 
eigen kunnen maken. Het ontwerpen van 
een spel blijkt minder gecompliceerd dan 
menigeen denkt. 

Wij stellen ons voor dat talloze 
Commodore-gebruikers daar al lang achter 
waren. We hebben zelfs het sterke ver- 
moeden dat er op heel wat planken heel 
aardige zelf ontworpen spellen liggen te 
verstoffen. Jammer. Die spellen kunnen 
namelijk geld waard zijn. Commodore Dos- 
sier vraagt alle latente talenten om hun ar- 
chief eens door te snuffelen of om achter 
de computer plaats te nemen om het Spel 
Van De Maand of misschien zelfs het Spel 
Van Het Jaar te ontwerpen en het aan ons 
op te sturen. 


Natuurlijk stellen we daar iets tegenover. 


Als u werkelijk zo’n inventieve spel-ontwerper bent als 
u zelf denkt, daagt Commodore Dossier u uit dat te bewijzen. 
Bij deze is de jacht op nieuw talent geopend. 


Maandelijks kiest een deskundige jury uit 
de ingezonden spellen een SPEL VAN DE 
MAAND. De maker van dat spel ontvangt 
voor zijn inspanningen een doos met 10 
schijven van goede kwaliteit, een prijs met 
een gemiddelde winkelwaarde van 100 
gulden. Inzendingen die niet tot het spel 
van de maand worden uitverkoren, maar 
wel zo goed zijn dat ze worden geplaatst, 
worden gehonereerd met het gebruikelijke 
tarief: 50 gulden. Uit de 12 SPELLEN VAN 
DE MAAND wordt tenslotte een SPEL VAN 
HET JAAR gekozen. Dat spel wordt door 
Commodore Dossier in samenwerking met 
een bekend software-bedrijf commercieel 
op de markt gebracht. De maker deelt dan 
uiteraard in de opbrengst van dat spel via 
de gebruikelijke auteursrechten-regeling. 
Commodore Dossier houdt zich het recht 
voor ook tussentijds spellen commercieel 
op de markt te brengen, als de kwaliteit 
daartoe aanleiding geeft. 


i_ROGTEL 


PROGRAMMA’S PER TELEFOON 


Haal met Telesoftware de mooiste programma’s uit onze databank in Viditel. 

Een abonnement op Viditel (f 11,90 per maand inclusief PTT modem) en het speciale MICROTEL 
600 programma en abonnement voor uw microcomputer zijn voldoende om programma’s vanuit 
Viditel binnen te halen, op cassette of floppy te zetten en later te "runnen”. De meeste Microtel 600 
programma’s zijn gratis, voor enkele geldt een geringe beeldheffing. 


Een uitbreiding van uw computerhobby, die 24 uur per dag beschikbaar is zonder problemen. De 
programma’s komen van Commodore Nederland, de VCGN gebruikersgroep, Commodore-Info, 
Jumbo-spelen, Viewdata System Group en vele anderen. 


Maak die stap naar de toekomst en ga over op Telesoftware. 


SPELREGELS 


1. Ingezonden spellen moeten originee! zijn. Niemand 
zit te wachten op de zoveetste variant — hoe leuk 
ook — van Space Invaders of PacMan. Wij kennen 


natuurlijk niet alle spellen die in de handel! zijn. Theo- 


retisch is het daarom mogelijk dat een ’geleend’ spel 
door de mazen glipt. 

Inzenders vrijwaren de redactie van Commodore Dos- 
sier dan ook van eventuele claims van oorspronkelij- 
ke ontwerpers. 


2. Geplaatste programma’s worden eigendom van 
Commodore Dossier. De inzender biedt het program- 
ma tussentijds niet aan derden aan. 


3. Indien een programma commercieel wordt uitge- 


bracht, gaat de auteur akkoord met eventuele profes- 


sionele wijzigingen door een van de huis- 
programmeurs van Commodore Dossier. 


4. De beslissingen van de jury zijn bindend. 


600 





De nieuwe PTT standaard opent ongekende perspectieven. 


SE 
ee 


i1- COMMODORE  - SINCLAIR 
ree meth 
13- - APPLE 


Me ao Me cece MET ee 
9- Alg. informatie over TELE 


DE EERSTE NEDERLANDSE DATABANK VOOR TELESOFTWARE IN VIDITEL. 


Viditelprogramma’s met TELESOFTWARE- 


-lader zijn beschikbaar voor de merken: 


COMMODORE, BBC, IBM en ATARI. 


Binnen enige weken volgen programma’s voor 
de P2000, Apple, Sinclair en anderen. 


Voor meer informatie over mogelijkheden, 

prijzen en bestellingen: 

PER TELEFOON: 05612-311 tot 22.00 uur 
056 12-737 tot 17.00 uur 

PER POST: VSG/Microtel 600 

Postbus 95 

8390 AB Noordwolde 


VIA VIDITEL: Zie pagina *600# en verder 
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Op deze plaats zult u in elke aflevering van COMMODORE DOSSIER de 
SPEL TOP TIEN aantreffen. De TOP TIEN is een lijst van de tien best 
verkochte computerspellen in de afgelopen periode en wordt samen- 
gesteld door Frans Kleijweg in samenwerking met importeurs, groothan- 
dels en computerspeciaalzaken in heel Nederland. Deze onafhankelijke 
lijst wordt opgesteld aan de hand van verkochte aantallen en testresul- 
taten. De programma’s worden getest door een panel van ervaren en 
onervaren Commodore-gebruikers en beoordeeld op inventiviteit, speel- 
baarheid en gebruiksgemak. Ook worden prijs en kwaliteit vergeleken 
met andere, vrijwel identieke, programma’s. Denk maar aan de vijf of 


meer uitvoeringen van de Summer Games. Wij zullen bij de beoordeling 
veel aandacht besteden aan het optimaal benutten van de unieke mo- 
gelijkheden die de Commodore computers bieden. We weten allemaal 
dat de verpakking van de diverse spellen vaak meer belooft dan wordt 
waargemaakt. We willen u voor dit soort dure fouten behoeden. Per 
slot van rekening willen we allemaal met onze Commodore spellen spe- 
len, maar niet tegen elke prijs. Gelukkig beginnen de software prijzen 
over de hele linie te zakken en de kwaliteit stijgt. Natuurlijk geven we 
ook tactiek- en speltips. Reacties en/of opmerkingen van lezers (m/v) 
op deze rubriek zijn altijd welkom. 
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SOLOFLIGHT 
MicroProse Software 







orem ae a td AEM 


Eindelijk een viucht-simulator voor de ge- 
wone man. Alle basishandelingen van het 
vliegen zijn met de spelpook te besturen. 
Maar er zijn nog vele andere functies; deze 
zijn door middel van het toetsenbord te be- 
dienen. Zo regel je bijvoorbeeld de snel- 
heid met de toetsen 0-9, je drukt op 'B’ om 
te remmen en met ’L’ wordt het landings- 


COMMODORE DOSSIER 





», GHOSTBUSTERS 


p ACTIVISION — FL 55. 


fj TEMPO TYPEN 
P= RADARSOFT — FL 49. 


~ ARABIAN NIGHTS 
PP _ INTERCEPTOR — FL 34. 


@ ‘OPOGRAFIE N’LAND 









grond word je beschoten met dodelijke pij- 


- len, Mocht je dit alles overleven, dan bereik 


je eindelijk het paleis van de Sultan waar 
nieuwe uitdagingen en de Prinses wach- 
ten. Dit leuk uitgevoerde spel heeft een in- 
gebouwde stem-synthesiser die het 
sprookje vertelt. Prachtige plaatjes en ge- 
luid maken dit spel een genot om te 
spelen. 
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\ RADARSOFT — FL 49. ee 
systeem bestuurd. In de oefen-stand kun je : IMPOSSIBLE 
alle handelingen oefenen. iz SOLOFLIGHT MISSION 
Je kiest een staat en de computer vertelt Epyx Inc. 


waar de post af te leveren. Om echt te sco- 
ren moet je de moeilijker routes vliegen en 
in een zo kort mogelijke tijd zoveel mogelijk 
post bezorgen. Als extra complicatie be- 
gint het weer snel te veranderen. Gaan er 
instrumenten kapot dan moet je zo snel 
mogelijk landen op het eerstvolgende 
vliegveld. Je hebt dit simulatie-programma 
vrij snel onder de knie, dus veiligheidsrie- 
men vast en viiegen maar. - 

Voor 69 gulden biedt dit programma veel 
waar voor zijn geld, vooral ook door het uit- 
stekende gebruik van de grafische moge- 
lijkheden van de C-64. 
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ARABIAN 

NIGHTS 

interceptor Software 

Arabian Nights is gebaseerd op de eeu- 
wenoude sprookjes van Sheherazade. De 
computerversie van Interceptor is ver- 
schrikkelijk leuk. Om het spel goed te spe- 
len moet je de vazen met de letters in de 
juiste volgorde (ARABIAN) ophalen. Maar 
wees voorzichtig, want je wordt bedreigd 






: MICROPROSE — FL 69. 


, LOCO 
ALLIGATA — FL 38. 
er Thompson's Decathl. 
OCEAN — FL 39. 
gm, ZAXXON 
. SYNAPSE — FL 49. 


<@_ HAVOC 


: DYNAVISION — FL 49. 


~gcy 'MPOSSIBLE MISSION 


P EPYX. INC — FL 69, 













Deze TOP TIEN kwam tot stand dankzij 
de medewerking van: Aacksoft International 
071-412121 

Computer Collectief 020-223573 

Funtronics 070-647371 M.M.C. 020-183095 
Vendex Software Development 020183095 








door octopussen en roofvogels. Het ver- 
volg van de reis gaat over een van krokodil- 
len vergeven rivier, waar ook nog kwaad- 
aardige bedouinen je met stenen bekoge- 
len, naar de ondergrondse grotten. Daar 
bedreigen geesten je leven. Eindelijk be- 
reik je het vliegende tapijt en vlieg je nieu- 
we uitdagingen tegemoet. Bij Bagdad word 
je aangevallen door de luchtmacht van de 
Sultan op vliegende tapijten. Vanaf de 


Vanaf het moment dat je de stem van Dr. 
Elvin Atombender hoort, weet je dat dit 
spel anders is dan andere. Snelle actie, 
fantastische grafische- en geluidseffecten 
en een mooie spraak-synthesiser. Met de 
spelpook controleer je een radslag maken- 
de figuur, die alle stukken van cde puzzel 
moet verzamelen uit dertig verschillende 
kamers, terwijl meer dan negentig robots je 
proberen te stoppen. Je gaat met de lift 
naar alle verdiepingen en kamers. Elke 
keer dat je een stuk van de puzzel hebt ge- 
vonden wordt het automatisch overge- 
bracht naar de centrale computerruimte. 
Na het verzamelen, ga je passen en meten 
om de stukken in de juiste volgorde te krij- 
gen. Je kunt de stukken horizontaal of ver- 
ticaal draaien en hun kleuren veranderen, 
of hulp vragen aan de computer. Maar 
haast je want de tijd loopt door. Er zijn twee 
codekamers met codewoorden om bijvoor- 
beeld de robots tijdelijk uit te schakelen. In 
deze codekamers moet de speler in de 
juiste volgorde een stuk muziek naspelen 
om een codewoord te krijgen. Als je niet 
binnen de tijd klaar bent met de puzzel zal 
Dr. Atombender je op een bijzonder cyni- 
sche manier uitlachen, terwijl het scherm 
uit elkaar valt. Elke keer dat je dit spel 
speelt, wordt er een nieuw patroon aan ka- 
mers gegenereerd. Dit spel gebruikt de 
technische mogelijkheden van de Commo- 
dore uitstekend. 
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GHOSTBUSTERS 
Activision 


Na de tophit single en de film nu Ghost- 
busters op de Commodore 64. Na het zien 
van de videoclip op Sky Channel snel op 
zoek naar de Activision game. In de verte 
het geluid van een radio. Het geluid van 
. een liedje dat in je hoofd blijft hangen. Te- 
gelijk met de melodie verschijnen de woor- 
den met een bal op het scherm. Druk op de 
spatie-balk en het spel begint. Je krijgt 
10000 dollar om spookverjagings-appara- 
tuur aan te schaffen, plus een plattegrond 
van de stad, waarop de plaats van de spo- 
ken staat. Dan via de rijksweg, naar een 
gebouw in het midden van de stad. In en 
om het gebouw hangen de geesten rond. 
Je zet een val op en probeert het spook te 
vangen. Maar let op, de spoken zijn niet 
weerloos. Ben je succesvol, dan hoor je de 
uitstekende stem-synthesiser schreeuwen 
*Ghostbusters’ en ontvang je ook nog wat 
geld. Een uitstekend spel. Niet het beste 
dat ik ooit gespeeld heb, maar zeer zeker 
de moeite waard. 
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DOSSIER Tip 
Het spel Ghostbusters is wel erg krenterig 
met zijn begin-kapitaal. De onervaren spe- 
ler spendeert zijn werkkapitaal meestal al 
voor een groot deel aan de bedrijfsauto 
met geest-bestrijdingsapparatuur. Geluk- 
kig heeft de ontwerper een mogelijkheid in- 
gebouwd om aanvankelijk wat ruimer bij 
kas te zijn. Dat gaat als volgt. Naam: GRR, 
PAC. Do you have an account: YES. Ac 
count number: 11707000. Met die proce- 
dure wordt het beginkapitaal $30900. 


DALEY 
THOMPSONS’S 
DECATHLON 

Ocean Software 

Deze zoveelste uitvoering van Summer 
Games is uitsluitend geschikt voor mensen 
die zowel sterke polsen als een sterke spel- 
pook bezitten. De graphics van dit spel zijn 
van een uitstekende kwaliteit. Jammer dat 
er geen stem-synthesiser zit ingebouwd. 
De score wordt bij alle tien nummers bijge- 
houden en het huidige wereldrecord voor 








het onderdeel verschijnt ook op het score- 
bord. Het publiek juicht bij elke finish of je 
nu wint of verliest. Om nog even op de 
spelpook terug te komen, de bewegingen 
van Daley Thompson worden bewerkstel- 
ligd door de spelpook heen en weer te be- 
wegen. Dus hoe sneller je beweegt, des te 
sneller zal Daley lopen. Met de vuurknop 
kan je ook springen en gooien. Het gooien 
en springen valt niet mee, maar het valt te 
leren. Dit spel is z’n prijs zeker waard want 
het kost per slot van rekening slechts 39 
gulden. 
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ZAXXON 

Synapse Software 

Zaxxon is het klassieke driedimensionele 
speelhalspel, waarin de speler zoveel mo- 
gelijk schade moet toebrengen aan de vij- 
and in Asteroid City. Vernietig luchtafweer- 
geschut, kruisraketten en brandstoftanks. 
Met behulp van de hoogtemeter, links in 
beeld, vlieg je door gaten in muren, onder 
laserstralen door, ondertussen dodelijk af- 
weergeschut ontwijkend. Na een succes- 
volle missie door Asteroid City ga je de 
ruimte in om daar bedreigd te worden door 
ruimteschepen en vijandelijke jagers. Zorg 
ervoor dat je in Asteroid City genoeg 
brandstoftanks weet te raken, want anders 
stort je neer bij gebrek aan brandstof. Na 
de trip door de ruimte kom je in de tweede 
Asteroid City, het fort van Zaxxon. Deze 
stad is wezenlijk anders dan de eerste. De 
dodelijke robot verschijnt terwijl hij doel- 
zoekende raketten afvuurt. Die robot is al- 
leen te vernietigen door hem drie keer fron- 
taal te raken. Als je Zaxxon kan vernietigen 


"Tt 








gaat het spel verder en worden de aanval- 
len sneller en heftiger. Bij verlies van het 
schip in een van de Asteroid Cities, begin 
je opnieuw aan het begin van de stad. Het 
spel eindigt wanneer je je laatste schip ver- 
loren hebt. Bij 20.000 punten krijg je een 
extra schip. Om door de gaten in de muren 
te vliegen kan je het beste blijven vuren om 
de positie te bepalen. Al met al, een van de 
mooiste driedimensionele spellen voor de 
Commodore-64. lets langzamer dan in de 
speelhallen maar nog steeds een uitdaging 
voor de ware speler. 
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LOCO 
Alligata Software 


Terwijl de trein over het grote rangeerter-. 


rein rijdt, door een prachtig landschap, 
word je aangevallen door bommenwer- 
pers, luchtschepen en explosieve wagons. 
Snelle reflexen zijn beslist nodig om ver- 
nietiging te voorkomen. Uit de schoorsteen 
komt vernietigende rook en voor uit de lo- 
comotief komen kogels om eventuele 
obstakels uit de weg te ruimen. Brandstof 
wordt bijgeladen door langs de brandstof 
tanks te sturen die zich overal op het em- 
placement bevinden. Bij elke doortocht in 
een station zwaait de stationschef met een 
viag. Na vijf viaggen ga je naar het volgen- 
de niveau. Er zijn twee spel-standen, lang- 
zaam en snel. Het scherm is opgebouwd 
uit twee delen, een Zij-aanzicht en een 
boven-aanzicht. Een spel dat er makkelij- 
ker uitziet dan het is. Conclusie: vele uren 
spelplezier, mede door het uitstekend ge- 
bruik van graphics en geluid. 
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NEDERLANDSE SPOORWEGEN 3737 


Aackosoft 

Liefhebbers van treinen, opgelet. Aacko- 
soft timmert aan de weg, of liever gezegd 
aan de spoorweg. Onlangs presenteerde 
dit Nederlandse software-huyis '3737’, een 
simulatieprogramma gebaseerd op de le- 
gendarische stoomlocomotief met die 
naam. Het programma is ontwikkeld door 
een spoorwegexpert bij uitstek, Henri Ver- 
straaten, machinist bij de NS. Hij ontwik- 
kelde eerder het simulatieprogramma van 
de Sprinter. Hiermee was de NS allesbe- 
halve gelukkig, omdat het veel te echt 
overkwam en een aantal mensen wel eens 
op het idee zou kunnen brengen om met 
een echte Sprinter aan de haal te gaan. 


Een van zijn collega’s uit het stoomtijd- 
perk, H. Vialle, verzag hem voor dit pro- 
gramma van de nodige technische gege- 
vens en tekeningen. Het spel wordt op het 
toetsenbord gespeeld. Goed opletten voor 
spoorwegovergangen, . die zijn namelijk 
niet beveiligd en dus moet je de stoomfluit 
bedienen. Ook niet vergeten om op tijd te 
stoken en water bij te vullen. De beelden 
van de locomotief zelf zien er aardig uit, 
maar die van het landschap zijn wat aan de 
magere kant. Toch een mooi stuk Neder- 
landse programmatuur, voorzien van een 
goed verzorgde gebruiksaanwijzing voor 
een aantrekkelijke prijs (f34,50). 
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HAVOC 


Dynavision 

Een spel met honderden destructieve ob- 
jecten, uitstekend geschikt voor hen die al 
uitgekeken zijn op Zaxxon. Dit driedimen- 
sionele spel geeft uitstekende plaaties en 
het geluid kan van te voren worden in- 
gesteld. Vlieg met je World Peace Force ja- 
ger door vijandelijk gebied en je wordt aan- 
gevallen door allerlei objecten. Bij een tref- 
fer stort je niet meteen neer, maar het 
vliegtuig wordt stukken moeilijker te bestu- 
ren. Obstakels, zoals muren, gebouwen en 
dergelijke, kunnen alleen met een uiterst 
gevoelige spelpook ontweken worden. 
Wellicht zou de zogenaamde ’track-ball’ - 
de biljartbal-spelpook - hier goede 
diensten bewijzen. Als je niet in het bezit 
bent van zo’n gevoelige spelpook kan ik 
Havoc niet aanbevelen. ’t Is een mooi uit- 
gevoerd spel met mooie graphics. Jammer 
van de besturingsmoeilijkheden. 
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TEMPO TYPEN 

Radarsoft 

Dit is een Nederlandstalig speel/leer pro- 
gramma dat, zoals de naam al aangeeft, je 
in hoog tempo leert typen. Dit programma 
wordt geheel op het toetsenbord uitge- 
voerd en je hebt dus geen spelpook nodig. 
In zeven lessen wordt het tienvinger- 
systeem geleerd. Eerst met lettercombina- 
ties en dan woorden, zinnen en teksten. 
Met deze nieuw verworven kennis kan het 
spel, een soort examen dus, gespeeld wor- 
den. De woorden verschijnen van rechts 
naar links op het scherm en dan is het zaak 
ze zo snel mogelijk weg te typen, voor ze 
de laserstraal raken, en zo te scoren. Dit 
programma kan de. vergelijking met soort- 
gelijke buitenlandse software makkelijk 
doorstaan en steekt hier zelfs ver bovenuit. 
Een aanrader dus voor alle leeftijden. 
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TOPOGRAFIE 

VAN NEDERLAND 
Radarsoft 

Weer een Nederlandstalig, zichzelf de- 
monstrerend, speel/leer programma van 
Radarsoft. Een leuk idee, aardrijkskunde 
leren met de computer. Met de spelpook in 
de hand vlieg je boven Nederland. Je 
bestuurt een helicopter en onderin het 
scherm verschijnt de plaats waar je naar 
toe moet vliegen. Als je in de buurt van de 
plaats van bestemming komt begint deze 
te knipperen en volgt opgave van de vol- 
gende stad, provincie, eiland of rivier. Na 
een aantal. makkelijke opgaven wordt het 
moeilijker: Een van de leukste mogelijkhe- 
den van het spel is de opzoek- 
mogelijkheid. Je geeft dan zelf plaatsen op 
die de computer voor je opzoekt. Overho- 
ren en niveau-veranderingen behoren ook 
tot de mogelijkheden. Een echt leuk en 
leerzaam speel/leerprogramma. 
TESTRESULTAAT 8/10 





TOT 757% KORTING OP 
COMMODORE-64 SOFTWARE! 


Eénmalig aanbod voor alle lezers van dit Commodore Dossier! En onze PIONIERABONNEES krijgen 
nog eens f 10,- EXTRA KORTING op hun bestelling. (Dit is een van de vele extra’s die onze Pionier- 
abonnees telkens aangeboden krijgen -naast 20% korting op een jaarabonnement op Commodore 

Dossier. Tot 29-3-1985 kunt u nog Pionierabonnee worden. Belangstelling? Lees dan onze adverten- 


tie elders in dit blad). 


Dit software-aanbod is geldig t/m 15-5-1985 en zolang de voorraad strekt. EEN OL 


Dit zijn de voordeelpakketten: 


PILOT compiler 
LOGO compiler 
SIMON'S BASIC compiler 


INLEIDING BASIC programmeercursus : _ 


PC/BASE database 
PC/CALC spreadsheet 


U kunt bestellen 
met de antwoord- 
kaart elders in dit 
Commodore Dossier. 
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PRODUKT-INFORMATIE 


EEN PRINT EF 
NIEMAND KAN ZONDER 
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Vroeg of laat zult u tot de aanschaf van een afdrukker voor uw Commodore computer overgaan. Een printer maakt u minder afhan- 
kelijk van de apparatuur: u kunt het resultaat van de programma’s meenemen waarheen u maar wilt. Bovendien gaat het program- 
meren een stuk makkelijker als u de listings op papier kunt bestuderen. En wie eenmaal de kracht van een tekstverwerker ontdekt, 
begrijpt al snel niet meer hoe hij ooit zonder printer door het ieven is gegaan. 


We kunnen de printers die momenteel voor 
de Commodore-computers op de markt be- 
schikbaar zijn, verdelen in twee groepen: 
de direct-aansluitbare en die waarvoor een 
aparte koppeling (interface) nodig is. Daar- 
onder verstaan we een verbindingskabel 
die de codes die uw computer uitzendt, 
omzet in een voor de printer geschikt 
signaal. 


Omdat zo’n koppeling meestal niet goed- 
koop is, doet u er verstandig aan de prijs 
voor de niet-direct-aansluitbare printer in 
gedachten met zo’n 300 gulden te verho- 





gen. Dat kost het u immers extra om uw ap- 
paratuur aan de praat te krijgen. 


DOEL 

Voor we u meenemen door het woud van 
technische termen staan we even stil bij de 
volgende drie vragen: 

1) Hoeveel geld wilt u besteden? Denk 
daarbij vooral aan de eventuele extra 
kosten voor een interface. 

2) Waarvoor wilt u uw afdrukker gebrui- 
ken? Een listing voor zelfstudie vereist 
minder kwaliteit dan een manuscript voor 
een uitgever! 


3) Zijn de grafische mogelijkheden van uw 
computer van belang? Een groot aantal af- 
drukkers weet geen raad met de karakter- 
set van Commodore. Maar hoe vaak heeft 
u deze speciale tekens nodig? 


PRINTERSOORT 


We zullen in ons overzicht een aantal 


matrix-printers en letterwiel-printers be- 
handelen. 

Matrixprinters bouwen hun letters op uit 
kleine puntjes. U kunt dit prima vergelijken 
met de manier waarop uw tekens op televi- 
sie of monitor worden weergegeven. 
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EEN PRINTER, 
NIEMAND KAN ZONDER 


Een letterwiel- of margrietwiel-printer (dai- 
sywheelprinter) maakt gebruik van een 
schijf die sterk aan de bloem van een ma- 
deliefje (daisy) of margriet doet denken. U 
moet zich voorstellen dat op de punten van 
de bloemblaadjes letters zijn bevestigd. Dit 
zijn massieve letters, net zoals op een ge- 
wone schrijfmachine. Tijdens het afdruk- 
ken draait de schijf razendsnel rond en 
wordt de gekozen letter voor het afdrukha- 
mertje geplaatst. Met een letterwiel-printer 
krijgt u een bijzonder fraaie afdruk. In vak- 
termen spreken we over ’letterkwaliteit’. 
De duurdere matrix-printers benaderen die 
letterkwaliteit echter aardig. Ze moeten 
dan de mogelijkheid hebben om ’emphasi- 
zed’ af te drukken. Dat wil zeggen dat de 
letters tweemaal op papier worden gezet. 
De tweede maal verschuift de printkop 
echter een fractie, zodat het wit tussen de 
puntjes van de eerste aanslag precies 
wordt opgevuld. U moet er natuurlijk reke- 
ning mee houden dat dit proces de verwer- 
kingstijd van uw afdruk verdubbelt! 


TECHNISCHE 
TERMEN 

In ons overzicht vindt u een aantal woor- 
den die wellicht uitleg behoeven. We heb- 
ben ze met opzet in het Engels laten staan, 
zodat u andere printers gemakkelijk via 
hun handleiding met onze lijst kunt verge- 
lijken. 


CPS 

Onder CPS verstaan we het aantal tekens 
dat de printer per seconde op papier zet. 
Het is hier al net zo als bij de opgave van 
het benzineverbruik door autofabrikanten: 
het genoemde aantal is gemeten onder de 
meest ideale omstandigheden. Wanneer u 
in de toekomst van plan bent ’bijna letter- 
kwaliteit’ met uw matrix-printer te gaan 
produceren, kunt u het aantal tekens per 
seconde meteen halveren. 


MATRIX 

Zoals hiervoor al uiteengezet, worden de 
tekens bij een matrixprinter opgebouwd uit 
puntjes. Hoe meer puntjes, hoe beter de 
kwaliteit van de letter. Van een 5x7-matrix 
mag u dus minder verwachten dan van een 
9x11-maitrix. 


TRUE DESCENDERS 

De grootte van de matrix bepaalt of letters 
als y, p, g enj een ’staart naar beneden’ 
hebben. Bij goedkope matrix-printers 
bestaat geen verschil tussen de onderkant 
van deze letters en die van de andere, wat 
op zijn zachtst gezegd ‘even wennen’ is. 


Velen die brieven en artikelen op een tekst- 
verwerker willen maken, wijzen matrixprin- 
ters zonder ‘true descenders’ meteen al af. 


FRICTION FEED 

Wanneer het papier om een rol in de af- 
drukker gaat (net zoals bij een gewone 
schrijfmachine) spreken we van friction 
feed. Een voordeel van dit systeem is dat 
er met gewoon papier gewerkt kan worden. 
Een scheurrand staat immers wat minder 
verzorgd. Een nadeel: papier zonder perfo- 
ratierand wordt eerder scheef getrokken. 


TRACTOR FEED 

U hebt kettingpapier nodig als u een af- 
drukker koopt die alleen een voorziening 
voor tractor feed heeft. De ’sprockets’ 
(tandwieltjes die in de perforatie grijpen) 
zijn verschuifbaar, zodat u ook het smalle- 
re papier, waarop etiketten meestal ge- 
kleefd worden, zonder problemen kunt ver- 
werken. 


PINFEED 

In de meeste gevallen wordt onder pinfeed 
hetzelfde verstaan als onder tractor feed. 
Wij wilden aan deze woord-overtolligheid 
maar eens een einde maken door pinfeed 
te definiéren als een tractor feed waarbij de 
‘sprockets’ niet of nauwelijks verschuif- 
baar zijn. U vindt zo’n pinfeed bijvoorbeeld 
op de Epson FX-80. De rol die voor friction 
feed aanwezig is, maakt de speling van de 
*sprockets’ zo klein dat alleen A-4 ketting- 
papier kan worden gebruikt. 


BI-DIRECTIONEEL 

Een afdrukker die bi-directioneel is, drukt 
zijn regels afwisselend van links naar 
rechts en van rechts naar links. Bij een 
eenvoudige printer wordt de afdrukknop 
steeds weer helemaal naar links ge- 
transporteerd alvorens de volgende regel 
aan de beurt komt. Bi-directionele printers 
werken efficiénter en daardoor sneller. 


CBM-GRAPHICS 

Hieronder wordt verstaan of de printer de 
speciale Commodore karakterset kan af- 
drukken. Een aantal koppelingen geeft ook 
niet-Commodore-printers deze mogelijk- 
heid, maar hiermee is in de tabel geen re- 
kening gehouden. De enige afdrukker van 
een ‘ander merk’ die  zelfstandig 
Commodore-tekens afdrukt, is de Seikos- 
ha GP100VC. 


DOWNLOAD 

Met een printer die voorzien is van deze 
mogelijkheid bergt u een zelf ontworpen 
karakterset op. U zou hiervoor bijvoorbeeld 
de speciale Commodore-tekens kunnen 
nemen. 


PRINT MODES 

Afhankelijk van de gekozen printer zijn er 
diverse manieren om uw afdrukken te ver- 
fraaien: 


- reversed wil zeggen dat u een witte letter 
tegen een zwarte achtergrond krijgt; 

- double strike maakt uw letters zwarter 
door ze nogmaals aan te slaan; 


- double-width tekens hebben twee keer de 
breedte van een gewoon teken; 

- condensed is het tegenovergestelde van 
double-width: de letters worden juist 
smaller; 

- italics geeft aan of de printer een voorzie- 
ning biedt voor schuin schrift; 

- emphasized is al eerder genoemd: hierbij 
worden de karakters een tweede keer aan- 
geslagen met een iets verschoven matrix, 
waardoor men letterkwaliteit kan fingeren; 
- proportioneel wil zeggen dat elke letter 
precies de ruimte krijgt die hij nodig heeft; 
tweemaal de letter | achter elkaar afdruk- 
ken gebruikt in deze toestand minder pa- 
pier dan tweemaal de letter m; 

- pica is het lettertype dat op de meeste 
printers (’en schrijfmachines trouwens) 
standaard aanwezig is; 

- elite is de naam van een wat rechter let- 
tertype dat op een aantal printers als extra 
is toegevoegd; 

- underlining geeft de mogelijkheid auto- 
matisch te onderstrepen. Wanneer de prin- 
ter deze mogelijkheid niet heeft, kunt u de 
wagen zonder regelopvoer terugzetten, het 
juiste aantal streepjes uittellen en onder 
dezelfde regel afdrukken; 

- superscript is handig om exponenten van 
wiskundige formules in de lucht te laten 
zweven; 

- subscript komt bij scheikunde van pas, 
want daar zakken de exponenten juist een 
stukje door de vioer. 


BIT-IMAGE 

Wanneer een printer een voorziening voor 
bit-image heeft, kunt u bijvoorbeeld teke- 
ningen en grafieken afdrukken. Deze mo- 
gelijkheid wordt bijzonder op prijs gesteld 
door mensen die graag een ’screendump’ 
maken (het beeldscherm naar de printer 
sturen). 


DIP-SWITCHES 

Veel printer-gebruikers zullen de volgende 
ervaring met ons delen: de afdrukker is pri- 
ma aangesloten, maar de tekst wordt in 
zijn geheel op één regel neergezet. Een 
ander symptoom van dezelfde ziekte: de 
regels worden wel onder elkaar afgedrukt, 
maar telkens met een regel tussenruimte. 
De oorzaak van deze problemen is eenvou- 
dig: niet alleen uw computer, ook uw prin- 
ter kan een opdracht tot ’regelopvoer’ ge- 
ven. Wanneer u alles op één regel krijgt, 
moet u eenvoudig de regelopvoer van de 
afdrukker aanzetten. Krijgt u juist een lege 
regel extra, dan moet de regelopvoer van 
de printer uit. U kunt dit meestal instellen 
door middel van een zogenoemde ‘dip- 
switch’, een schakelaartje dat (helaas 
meestal op een onmogelijke plaats) in uw 
afdrukker verborgen zit. Meestal is er een 
aantal van deze schakelaartjes. U kunt bij- 
voorbeeld kiezen uit geluidssignalen, inter- 
nationale tekens enzovoort. De ’dip- 
switches’ bepalen de toestand van uw prin- 
ter na het inschakelen van de stroom. 





DE AFDRUKKERS 


Seikosha GP 100 
Ce) eed 

HET 

CBM 803 

RY ETACT Tim LD. 
Panasonic KX-P 1090 
SIT Cr) 

AVT 80 a 

PNA eae 


Brother CE-50 


U vindt in de tabel een aantal kenmerken- 
de gegevens van de geteste printers. Hier- 
onder voegen we zaken toe die ons bij het 
werken met de afdrukker in de praktijk op- 
vielen. 


COMMODORE 1520 PLOTTER PRINTER 

Een vreemde eend in de bijt (en daarom 
ook niet in de tabel opgenomen) is de 1520 
Plotter Printer. De prijs van dit apparaat, 
momenteel nog geen 300 gulden, was aan- 
leiding hem toch in dit artikel te noemen. 
De 1520 komt pas volledig tot zijn recht 
wanneer u er tekeningen mee maakt. Die 
tekeningen kunnen zelfs in vier kleuren 
(groen, rood, blauw en zwart) worden uit- 
gevoerd. 


De plotter werkt op kassarolpapier van 114 
mm, wat voor een presentatie niet zo’n 
luxe indruk maakt. Op dat papier wordt met 
(vier) gekleurde balpennen geschreven. 
Zowel de balpennen (voor de X-richting) 
als het papier (Y-richting) is in beweging. 
Het is echter ook mogelijk teksten en 
listings met de 1520 te produceren. U kunt 
zelfs 80 tekens in de breedte op het kassa- 
rolpapier krijgen, maar den bent u wel 
spoedig aan een bril toe (of sterkere gla- 
zen/lenzen). Veertig tekens in de breedte 
is veel prettiger leesbaar. 

De beruchte grafische Commodore-tekens 
zijn niet met de plotter af te drukken. In 
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plaats daarvan krijgt u onderstreepte 
letters. 

Commodore heeft de 1520 het device- 
nummer zes gegeven. Dat is het nummer 
waarmee de computer de aangesloten 
printer aanspreekt. De achterliggende ge- 
dachte was dat de gebruiker dan de moge- 
lijkheid hield om op device-nummer vier 
een echte printer aan te sluiten. Het is 
daarvoor nodig dat de seriebus op de ach- 
terkant van of de 1520 of de printer her- 
haald wordt, zodat u door kunt koppelen. 
Nu, bij de 1520 zit die bus er alvast niet...! 
Een gevolg van de keuze voor het device- 
nummer zes is dat er geen enkele tekstver- 
werker bruikbaar is. U verandert het 
device-nummer door een wijziging op de 
printplaat van de 1520 aan te brengen. 
Hiermee verspeelt u echter wel uw ga- 
rantie! 

Tenslotte een opmerking over de balpen- 
nen: deze zijn van Commodore alleen als 
set verkrijgbaar. En raad eens welke 
steeds leeg is? Juist: de zwarte! 


SEIKOSHA GP 100VC 

De GP 100VC is de Seikosha-uitvoering 
van de inmiddels niet meer verkrijgbare 
Commodore 1525. De Nederlandse impor- 
teur heeft overigens aangekondigd dat ook 
dit model uit de handel zal verdwijnen. We 
wilden de printer toch in ons overzicht op- 
nemen zodat de vele bezitiers ervan hun 





apparaat kunnen vergelijken. Bovendien 
kon het nieuwe model van Seikosha niet 
op tijd worden aangeleverd. 

Er zit een vreemd lint bij deze printer: twee 
piepkleine blokjes waartussen een lang 
stuk lint hangt. Het lint is nogal blauw, 
waardoor de afdruk aan contrast wat te 
wensen overlaat. 

Het apparaat gebruikt het zogenaamde 
éénhamer-systeem. Dit wil zeggen dat al- 
les wat u afdrukt door één naaldje op het 
papier gebracht moet worden. De GP 
100VC is daardoor nogal langzaam. Bo- 
vendien maakt hij een vreselijke herrie. 
Het papier gaat maar in één richting door 
de printer, wat al gauw aanleiding geeft tot 
verspilling. 

Er is geen extra seriebus aanwezig, de GP 
100VC vormt dus de eindhalte van uw 
systeem. De prijs geldt als het belang- 
rijkste pluspunt van deze machine. 


COMMODORE MPS-801 

De MPS-801 is ’bruin’ uitgevoerd, wat keu- 
rig aansluit bij de kleur van de CBM- 64 en 
de 1541 diskdrive. De machine werkt wat 
sneller dan de Seikosha en er is een extra 
seriebus aanwezig om door te koppelen 
naar een volgend apparaat. De 801 is uit- 
gerust met een schakelaar waarmee u hem 
device-nummer vier of vijf kunt geven. In 
een derde stand voert het apparaat een 
zelftest uit. 
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p> De MPS-801 heeft geen ‘true descenders’, 


net zo min als de Seikosha. Het schrift van 
Seikosha, MPS-801 en MPS-803 is niet of 
nauwelijks van elkaar te onderscheiden. 

De lintcassette is uitgerust met een inktpa- 
troon, zodat u een paar keer van hetzelfde 
lint gebruik kunt maken. Helaas zijn deze 
inktpatronen bijzonder slecht verkrijgbaar. 











COMMODORE MPS-803 
De kast rond de MPS 803 is zwart van 


kleur, een indicatie dat hij voor gebruik met 
een Plus/4 bestemd is. De Vic-20 en 
CBM-64 kunnen er vanzelfsprekend ook 
op worden aangesloten. Het letterschrift is 
identiek aan dat van de MPS-801: geen 
‘true descenders’ derhalve. 

Het grote verschil: de manier waarop het 
papier wordt vastgehouden. De MPS-803 
gebruikt hiervoor friction feed. Dit ont- 
neemt u de mogelijkheid met etiketten te 
werken en bovendien wil het papier nogal 
eens scheef trekken. Een losse tractor 
feed is overigens als accessoire ver- 
krijgbaar. 

De handleidingen van de MPS-serie laten 
veel te wensen over: termen als ’cursor up’ 
en ‘cursor down’ zijn niet erg duidelijk. 
Commodore bedoelt er de twee grafische 
toestanden mee: hoofdletters en kleine let- 
ters of grafische tekens en hoofdletters. 
Uiteraard kunt u beide karaktersets afdruk- 
ken en, in tegenstelling tot op uw tv, ook 
binnen een regel van de ene op de andere 
set overschakelen. 


STAR GEMINI 10 X 

Voor deze afdrukker heeft u een koppeling 
nodig. Wij gebruikten de zogeheten ’De 
Vries Interface’. 

Gezien de prijs biedt het apparaat ontzet- 
tend veel mogelijkheden. Ook bij de varia- 
bele kosten is aan de portemonnee van de 
gebruiker gedacht: de printer gebruikt los- 
se rolleties lint die minder dan tien gulden 
kosten. 


SEQIF 


SEMIS be 





De negatieve punten betreffen de papierin- 
leg: die is onnodig lastig daar de sprockets 
van de tractor feed pas aan het eind van 
het doorvoersysteem in het papier grijpen. 
Een heel gehannes voor je het papier naar 
de tandwieltjes hebt toegebracht. De plaat- 
sing van de dip-switches is ronduit ondoor- 
dacht. Je moet de hele kap slopen om ze 
te kunnen bereiken. 

De karakterset van de Star bevat één echte 
stomme fout: de j is een puntie te laag uit- 
gevoerd, zodat de letter ij, die uit een i en 
een j opgebouwd moet worden, er afschu- 
welijk komt uit te zien. Er zijn evenwel 
Rom-chips verkrijgbaar om dit euvel te ver- 
helpen. De officiéle prijs hiervoor bedraagt 
75 gulden maar in gebruikerskringen kunt 
u vast wel goedkoper terecht. 
















































































































































































PANASONIC KX-P1090 

De Panasonic KX-P1090 werd door ons 
aangesloten met behulp van de ’De Vries 
Interface’. Wat betreft de mogelijkneden 
lijkt de Panasonic op de Star. De proble- 
men van de Star zijn hier echter ondervan- 
gen: de letter ij is van prima kwaliteit. De 
papierinieg is gemakkelijker doordat er 
meer werkruimte ter beschikking staat. 
De dip-switches bevinden zich aan de on- 
derkant van het apparaat. Even optillen is 
voldoende om een wijziging aan te bren- 
gen. De metalen bodem geeft het apparaat 
een robuuste indruk mee. 





EPSON FX-80 
Ook de Epson komt bijzonder solide over. 
Het apparaat is bijzonder snel (160 tekens 
per seconde) en verslaat daarmee alle an- 
dere printers in het overzicht. Wij gebruik- 
ten zowel de Evic als de Ultra-Proxa kop- 
peling om hem aan de praat te krijgen. 





De letter van de Epson is mooier dan die 
van de andere matrix-printers in ons over- 
zicht, al zijn de verschillen met de Star en 
de Panasonic subtiel. Bij de papierinieg 
verspeelden ze wel eens een velletie. De 
gebruiksaanwijzing geeft dan ook de tip 
het eerste velletie van een pak kettingpa- 
pier dubbelgevouwen in te voeren. Dit 
werkt het best als er midden op een gaatje 
wordt omgevouwen. 

De dip switches zijn bereikbaar door een 
klepje aan de bovenkant van het apparaat 
open te maken. De schakelaartjes liggen 
wel erg diep, zodat u een schroevedraaier- 
tje nodig hebt om ze te bedienen. 

De prijs van het apparaat vormt het belang- 
rijkste struikelblok. 






































AVT 80 ALPHA 

Deze printer testten we met behulp van het 
’De Vries interface’. Om met deze koppe- 
ling te werken, moesten we in de printer 
een extra voedingslijn aanbrengen naar de 
connector. Dit was nodig omdat de koppe- 
ling op pen achttien een 5 volt voe- 
dingsspanning verwacht, die bij de printer 
op een andere pen is aangesloten. Gezien 
de mogelijkheden biedt deze printer een 
erg goede prijs-prestatie-verhouding. Het 
enige dat we echt misten, was de mogelijk- 
heid om schuin schrift af te drukken. Erg 
opvallend is de mooie volle letter. Volgens 
AVT komt dat door het gebruik van ovale 
naalden in plaats van de normale ronde. 
De papier-invoer verloopt erg makkelijk, 
daar het papier eerst in het tractor- 
mechanisme wordt geplaatst en daarna bij- 
na automatisch verder de printer inloopt. 
Ook bij deze printer moesten we de hele 
kap slopen om bij de dip-switches te ko- 
men. De printer gebruikt hetzelfde carbon 
lint als de Commodore MPS 802 en dat zal 
de verkrijgbaarheid van het lint wel ten 
goede komen. 



























































AVT 100 BETA 
Bij het aansluiten van deze printer met be- 


hulp van het ’De Vries interface’ stuitten > 
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COMMODORE DOSSIER test de Commodore DPS-1101 daisywheelprinter 


COMMODORE DOSSIER test de Panasonic KX-P1090 matrixprinter 
MET 0.A. MOGELIJKHEDEN VOOR CURSZEF SCHRIFT 

en voor DUBBEL BREED SCHRIFT 

en cok om CONDENSED af te drukken 


COMMODORE DOSSIER TEST DE AVT 80A MATRIX PRINTER 
Condensed printen behoort tot de mogelijkheden 
evenals twee maal vergroot 


automatisch onderstrepen behoort ook tot de mogelijkheden 


COMMODORE DOSSIER TEST DE AVT 100B MATRIX PRINTER 
Condensed printen behoort tot de mogeli jkheden 
evenals twee maeal vergqroot 


ook schuin schrift is mogeli jk 


CP PT I a che Shed a LiF | nate dock drier 
FALL oi Ah 4 ORPGEDRUE TD WER EH 
Ero aidin meage Li dkk ‘oom LES Ss 


er cok con USNS] af te cle ker 


COMMODORE DOSSIER test de Epson FX-80 matrixprinter 
met o.a mogelijkheden voor SCHUIN SCHRIFT en 
DUBBRELBREEL DP SCHRIFT 


CONDENSED afdrukken is natuurlijk ook mogelijk! 


COMMODORE DOSSIER test de Star Gemini 10x matrix printer 
deze printer kan dubbel aanslaan 
maar ook twee keer =o greet uitprinten 


evenals condensed printen 


COMMOIORE DOSSIER teak che Comme HFS-801 matrixeeinber 
ALLE GRAFISCHE TEKEMS ¢ZORILS @c) eto RUHHEM APGEDRURT WORDEM 
Er zidn meaelijkheden on DIB BEL Bree oO 


en ook om Pause) af te deukken 


COMMODORE DOSSIER TEST DE BROTHER CE-50 DAISYWHEEL PRINTER 


Met HOOFD en kleine letters 
en automatisch onderstrepen 


4 


wevenals speciale functies zoals H,0 en 2 


COMMODORE DOSSIER test 


de Commodore VIC-152@ printer plotter 


COMMODORE DOSSIER teat de Seikosha GP-1G8VC matrixeprinter 

ALLE GRAFISCHE TEKEWS <ZOALS @07 bw KUMMEM APGEDRUKT WORDEM 
Er ziJjn mogelijkheden om DIBBELEREED 

en cok on GMI af te drukken 
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- COMMODORE DPS-1101 DAISYWHEEL PRINTER 


Via iniporteur Aashima in Rotterdam kon- 
den we even aan wellicht het eerste exem- 
plaar van de DPS-1101 in Nederland rui- 
ken. Het apparaat gebruikt letterwielen die 
uitwisselbaar zijn met die van Juki (Courier 
10), zoals we onder meer op afdrukkers 


EEN PRINTER, 
NIEMAND KAN ZONDER 


we op dezelfde voedingsproblemen als bij 
de AVT 80. Deze printer biedt een beter let- 
terbeeld dan de meeste andere omdat de 
matrix is opgebouwd uit maar liefst 9x11 
puntjes. In verhouding tot de overige niet- 
Commodore printers vielen de mogelijkhe- 
den ons een beetje tegen. Zeker gezien de 
prijs van het apparaat. Daarbij moet dan 
wel worden aangetekend dat zowel een 
Centronics als een RS-232 koppeling zijn 
ingebouwd. Ook hier was de plaatsing van 
de dip-switches weer ondoordacht, de hele 
kap moest er af om iets te veranderen. De 
papierinvoer verliep erg soepel. Gezien de 
snelheid, het lettertype en de ingebouwde 
interfaces lijkt deze printer ons eigenlijk 
meer geschikt voor andere computers. 


COMMODORE MPS 802 

Zonder meer de beste matrix printer die 
Commodore te bieden heeft. Hij is bruin 
uitgevoerd, zodat hij mooi bij de andere ap- 
paratuur past. Het is de snelste van alle 
Commodore-printers en hij levert een 
mooie volle letter. Het lettertype heeft veel 
weg van dat van de AVT 80. Gezien ook de 
bouw van het apparaat en het soort lint, 
zou het ons niet verbazen als de twee ma- 
chines door dezelfde fabrikant worden ge- 
bouwd. De printer wordt op de seriéle bus 
aangesloten. Het device-nummer is om- 
schakelbaar van 4 naar 5. Uiteraard biedt 
het apparaat alle Commodore tekens. Met 


van Triumph-Adler tegenkomen. 

Er wordt een IBM-carbonlint gebruikt, 
waardoor dit de eerste Commodore-printer 
is waar je gemakkelijk een lint voor kunt 
krijgen... 

De DPS-1101 beschikt over een brede wa- 
gen, zodat u A-3 papier kunt gebruiken 


behulp van de Koala Pad, een elektroni- 
sche tekenlei, was het zelfs mogelijk om 
een plaatje met hoog oplossend vermogen 
(high resolution) af te drukken. We moeten 
er eerlijkheidshalve wel bij vertellen dat het 
maken van een zo’n fraai beeld van het 
scherm langer dan een half uur duurt. Daar 
er gebruik wordt gemaakt van een carbon 
lint zal de prijs per afgedrukt vel erg oplo- 
pen. Naast kettingformulieren kan de prin- 
ter ook losse vellen aan, hij heeft dus zowel 
tractor- als frictionfeed. Speciale functies 
zoals schuin schrift en onderstrepen ont- 
breken. De printer is naar ons idee een 
goede keuze voor de hobbyist die goed bij 
kas zit, met dat voorbehoud dat het appa- 
raat niet ideaal is voor gebruik met een 
tekstverwerker. 


BROTHER CE-50 

Dit apparaat wijkt erg af van de andere die 
we getest hebben. Het is dan ook eigenlijk 
geen echte printer maar een omgebouwde 
typemachine. U krijgt er twee handleidin- 
gen bij, een voor gebruik als typemachine 
en een voor gebruik als printer. U sluit hem 
aan op de seriéle bus van uw Commodore. 
Doordat er niet met een combinatie van 
software en hardware wordt gewerkt, zal 
het apparaat met de meeste commerciéle 
programmatuur werken. Een test met het 
Easyscript tekstverwerkingspakket leverde 
dan ook geen enkel probleem op. Het afge- 
drukte lettertje ziet er mooi uit. Er wordt 
een carbon-lint in cassette gebruikt die niet 
overal verkrijgbaar is. Andere nadelen van 
deze cassette: slechts eenmaal te gebrui- 


waarmee 165 tekens op een regel mogelijk 
zijn. De dip switches zijn eenvoudig bereik- 
baar, een extra seriebus zorgt voor door- 
koppelen naar een volgend randapparaat. 
Na al die puntjes voor je ogen is de massie- 
ve letter van de letterwiel- printer een vera- 
deming. 








ken en bovendien vrij prijzig. De pinter kan 
kettingformulieren en losse vellen aan. De 
papier-invoer is efficiént. Voor mensen die 
zowel een nieuwe typemachine als een 
printer zoeken, is dit waarschijnlijk een 
ideale keus. Als belangrijkste nadeel van 
het apparaat geldt naar ons idee de prijs. 


LEVERANCIERS 

1520 Plotter Printer, MPS-801, MPS-803 en 
DPS-1101: Commodore Nederland bv, Amsterdam, 
tel. 020-882222. 

Seikosha GP100VC en Panasonic KX-P1090: Game- 
world, Botersloot 7, Rotterdam, tel. 010-133770, of 
Lijnmarkt 1, Utrecht, tel. 030-317355. 


Star Gemini 10X: DCS, Holtweg 6, 6816 RG Arnhem, 


tel. 085-340640. 

Epson FX-80: Manudax, Postbus 25, 5473 ZG 
Heeswijk-Dinther, tel. 04139-2901. 

AVT 80 alpha en AVT 100 beta: AVT Electronics 
BV, Regentesselaan 123, 2562 CW Den Haag, tel. 
070-465800. 

Brother CE-50: Jon Kee Groep, T.Prikkerstraat 50a, 
1062 BN Amsterdam, tel. 020-170806. 





PRINTER iNTERFACES 


Wanneer u voor een niet-Commodore prin- 
ter kiest, bent u verplicht een aparte kop- 
peling aan te schaffen die het mogelijk 
maakt om uw Vic-20 of CBM 64 aan te 
sluiten. 

De prijzen van deze koppelingen willen 
nogal eens rond de 300 gulden schomme- 
len, een gegeven dat vaak pas in de win- 
kels genoemd wordt nadat u ’ja’ tegen een 
printer hebt gezegd. 

Overtuig u voor de koop dat uw Commodo- 
re met de gekozen printer en koppeling sa- 
menwerkt. Het gaat om een aanschaf voor 
een flink aantal guldens, dus een de- 
monstratie is wel de minste service die 
men u mag geven. 


KCS SPEEDSAVER 7 INTERFACEKABEL 
In het vorige nummer van Commodore 
Dossier bespraken wij de Speedsaver van 
de firma Kolff. 
Deze Speedsaver bevat een Centronics- 
interface die u activeert door CENTR in te 
voeren. 
Door middel van een Centronics-kabel 
(eveneens bij de firma Kolff verkrijgbaar) 
kunt u uw Commodore op de gebruikers- 
poort van een willekeurige printer met een 
Centronics-ingang aansluiten. 
Met dit pakket maakt u listings of drukt u 
gegevens vanuit programma’s af. Als u in 
machinetaal programmeert kunt u hex- 
dumps en gedisassembleerde listings op 
papier zetten. Het grote nadeel van de 
Speedsaver is dat hij in het geheugen van 
uw CBM 64 op locatie 49152 en hoger is 
opgeborgen. Dit sluit werken met program- 
matuur die zich zelf op deze plaats bevindt 
~ uit. 
Een verder nadeel is dat een groot aantal commer- 
ciele tekstverwerkers voor hun uitvoer op de seriele 
bus rekenen. Deze programmatuur is ook niet met de 
Speedsaver te combineren. 
Tenslotte moet ten gunste van de Speedsaver opge- 
merkt worden dat de functie CENTR maar één van 
de vele mogelijkheden van het printplaatje is. Het 
Zou onjuist zijn alleen op de interface-mogelijkheid 
een oordeel te vellen. De Speedsaver is alleen 
bestemd voor de CBM-64. 


DE VRIES INTERFACE 
Deze, eigenlijk naamloze, koppeling heb- 
ben we voor het gemak maar de naam van 





de leverancier gegeven. Vlak voor het druk- 
ken van dit nummer bleek die leverancier 
onderdeel-problemen te hebben. De betere 
computershop moet een vergelijkbaar inter- 
face kunnen samenstellen. 

De koppeling bestaat uit een doosje met 
twee kabels eraan. De ene kabel heeft een 
din-plug die in de seriéle bus van de 64 
(Vic-20/C-16/Plus/4) past. De andere kabel 
eindigt in een Centronics-connector en past 
in de meeste niet-Commodore printers. 
Een schakelaartje op het doosje kiest voor 
Ascii dan wel CBM-Ascii. De cursor- 
besturingstekens worden, als u voor CBM- 
Ascii kiest, door letters vervangen. 

De voeding van deze interface wil nog wel 
eens problemen geven. Als pen achttien 
van de printer geen vijf volt levert (zoals bij 
de Epson) werkt de verbinding niet. Het is 
niet onmogelijk de voeding ergens anders 
af te tappen, maar hiervoor moet u gaan 
solderen. Omdat deze koppeling uitslui- 
tend uit hardware bestaat, werkt hij met bij- 
na alle commerciéle programmatuur. 


CARD/? B EN +G INTERFACES 

De firma Cardco levert verschillende kop- 
pelingen voor Commodore computers. Ze 
werken qua aansluiting hetzelfde als de 
hiervoor besproken ’De Vries Interface’, zij 
het dat de stroom van de cassettepoort 
wordt afgetapt. De cassetterecorder blijft 
gewoon aansluitbaar doordat de steker 
met een verlengstuk is uitgerust. 

Er zijn een aantal interessante extra’s bij 
deze verbindingskabels: door middel van 
zogenoemde dip-switches kunt u op de 
Cardco interface aangeven of u wilt dat er 
na elke regel een linefeed gegeven moet 
worden. Vaak bevinden dit soort schake- 
laartjes zich in de printer zelf. Bij Cardco 
hoeft u uw printer dus niet meer open te 
schroeven. U kunt het device-nummer van 
de afdrukker ook op de interface instellen, 
zodat u bijvoorbeeld met een verlengkabel 
nog een tweede printer op het gewone 
device-nummer aan kunt sluiten. 


De Card/? B heeft geen mogelijkheid de 
Commodore karakterset af te drukken. U 
heeft wel de beschikking over ’vertaalde’ 
cursor-besturingstekens. Het hartje, dat 
CLR vertegenwoordigt, wordt bijvoorbeeld 
vertaald tot [HM]. 


De achterkant van de Plus/4 ziet er wat hoopgevender uit dan die van de CBM-64. Naast de ’RS-232C voorbereide poort’ 
Zoals Commodore dat noemt, bevindt zich hier ook onder meer een parallel gebruikerspoort. 





Het type Card/? +G is wat duurder, maar 
geeft dan ook de hele karakterset inclusief 
cursor-besturingstekens. Daar ook deze 
koppelingen uit hardware bestaan, zijn er 
weinig problemen met de gekochte softwa- 
re te verwachten. Ook hier zijn zowel CBM 
64, Vic-20, C-16 als Plus/4 zonder meer 
aan te sluiten. 


EVIC EN ULTRA-PROXA. INTERFACES 

Twee koppelingen voor de populaire Ep- 
son RX en FX afdrukkers. Het zijn allerlei 
printplaatjes die in de Epson zelf gemon- 
teerd moeten worden. Niet zo’n lastige 
opgave. 

De Evic-koppeling wordt door importeur 
Manudax zelf geleverd. U krijgt bijna de 
hele Commodore-karakterset en kunt ’re- 
versed’ afdrukken. De koppeling maakt in 
feite een MPS-801 van de Epson. Door een 
speciale instructie is de interface uit te 
schakelen, waardoor ook alle andere 
Epson-mogelijkheden bereikbaar worden. 


De Ultra-Proxa interface is van Duitse ma- 
kelij. De cursor-besturingstekens worden 
hier (als u wilt) omgezet in letters. ’Rever- 
sed’ afdrukken is niet mogelijk. Op deze 
fronten verliest hij duidelijk van Evic. Het 
voordeel van Ultra-Proxa is dat er op het 
printplaatje een Din-contraplug zit waarop 
u een volgend randapparaat (of een reset- 
knop) past. 


DCS Interface 

Speciaal voor de Star Gemini 10 X printer 
is er een koppeling beschikbaar, die in de 
Gemini wordt ingebouwd. De printer wordt 
daarmee rechtstreeks aangesloten op de 
seriéle bus van de Commodore. Het voor- 
deel van de koppeling is dat er alle tekens 
van Commodore mee kunnen worden af- 
gedrukt. De koppeling verandert de Gemi- 
ni in feite in een MPS 801. Zelfs plaatjes 
met hoog oplossend vermogen kunnen 
door middel van het copy-commando in Si- 
mon’s Basic direct op de Gemini Star wor- 
den afgedrukt. Daar deze koppeling alleen 
maar uit hardware bestaat, werkt hij met de 


meeste commerciéle programmatuur 
samen. <4 
LEVERANCIERS 


KCS Speedsaver en Interface: Kolff Computer Sup- 


plies, Oranjelaan 230, 3312 GM Dordrecht, tel. 
078-149461. 

De Vries Interface: Handelsmaatschappij De Vries, 
P.A. Kramerhof 2, 1444 HH Purmerend, tel. 
02990-30217. 

Card/? B en +G interface: Dunnet, Kipstraat 16, 
3011 RT Rotterdam, tel. 010-332448. 

Evic Interface: Manudax, Postbus 25, 5473 ZG 
Heeswijk-Dinther, tel. 04139-2901. 


Ultra-Proxa Interface: Gameworld, Botersloot 7, Rot- 


terdam, tel. 010-133770, of Lijnmarkt 1, Utrecht, 
tel. 030-317355. 

DCS Interface: Aashima Trading, Achterklooster 7, 
3011 RA Rotterdam, tel. 010-149315 of 
010-141110. 
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Commodore Dossier Aktief ver- 
schijnt 12 keer per jaar. In fe- 
bruari, mei, augustus en novem- 
ber als bijlage in het hart van 
Commodore Dossier, in de overi- 
ge maanden als losse uitgave 
uitsluitend voor abonnees van 
Commodore Dossier. 


DEZE MAAND: 


NIEUWS 
pagina 35 
Met onder meer aandacht voor 
het nieuws van de CES in Las 
Vegas. De nieuwe machines 
C-128, Commodore PC, Commo- 
dore LCD in het kort. 


HANDLEIDING 
BIJ DE 
LISTINGS 
pagina 37 

Met ons eigen controle- 
programma zijn fouten bij het in- 
tikken van listings vrijwel onmo- 
gelijk. 


TIPS & TRUCS 
pagina 38 
Programmeer-adviezen van 
binnen- en buitenlandse professi- 
onals. Lezers helpen lezers. 


LISTINGS VAN 
LEZERS 
pagina 40 
Deze maand de voetbalprognose 
van Paul Spruit en Cees Duive- 
voorde 


PROGRAMMALS 
pagina 42 

Dit keer een professioneel Biorit- 

me van Toon Hoendervangers, 

Netspanning 64 en Sprite editor. 


SERVICE 
pagina 50 
Het belangrijkste nieuws van de 
verschillende gebruikersgroepen. 


cD MARKT 
pagina 50 
Gratis advertenties voor 
abonnees 
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COMMODORE IN CONCURRENTIESLAG MET IBM 


Eind januari introduceerde 
Commodore in Frankfurt de 
Commodore PC, een machine 
die volgens de specificaties 100 
procent uitwisselbaar is met de 
IBM Personal Computer. Het 
bedrijf mikt met de PC voorna- 
melijk op de markt voor zake- 
lijke gebruikers, die tot nu toe 
eigenlijk alleen werden bediend 


door de 8000-serie van Commo- 
dore. De Commodore PC moet 
inclusief BTW rond de 6000 
gulden gaan kosten, beduidend 
minder dus dan de IBM PC. 
Omdat beide apparaten uitwis- 
selbaar zijn, is er voor de 
nieuwste van Commodore met- 
een al een grote hoeveelheid 
programmatuur beschikbaar on- 


der het MS-DOS besturings- 
systeem. Volgens Commodore 
biedt de Commodore PC vooral 
qua grafische prestaties heel wat 
meer dan de IBM, bovendien 
voor een beduidend lagere prijs. 
De machine moet in maart in 
Nederland leverbaar worden. De 
juiste prijs wordt binnenkort be- 
kend gemaakt. 


OMZET COMMODORE GESTABILISEERD 


In december vorig jaar maakte 
Commodore International Ltd., 
het moederbedrijf van de natio- 
nale Commodore-vestigingen, 
bekend dat de omzet wereldwijd 
in vergelijking met het vorige 
jaar ietwat teruggelopen was. 
De explosieve groei van de afge- 
lopen jaren lijkt nu plaats te 
hebben gemaakt voor een wat 
rustiger verloop van de om- 
zetstijging. Maar Clive G. 
Smith, een van Commodore’s 


vice-presidenten, zei op een 
persconferentie in New York 
dat de ontwikkelingen geen re- 
den tot zorg geven. ’’We had- 
den weliswaar een iets hogere 
omzet in december verwacht, 
maar we zijn toch tevreden met 
de verkoopcijfers.’’ 
Commodore ging met zijn top- 
model, de CBM-64, afgelopen 
jaar de derde Sinterklaas- en 
Kerstmisperiode in. Het is daar- 
om nog maar de vraag of deze 


machine dit jaar nog als ’trek- 
paard’ zal kunnen fungeren. 
Met de Vic-20 en de 64 wist 
Commodore zo’n 60 procent 
van de wereldmarkt voor com- 
puters onder de 1500 gulden in 
handen te krijgen. 

Het bedrijf richt alle hoop nu 
op de nieuwe generatie machi- 
nes. Voor de hobby-markt zijn 
dat de 128, de Plus/4 en de 
C-16, voor de zakelijke markt 
de PC en de Amiga. De Com- 
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> modore 128, die op de Consu- 
mer Electronics Show in Las Ve- 
gas werd geintroduceerd, bevat 
in vergelijking met de 64 twee- 
maal zoveel geheugen, een inge- 
bouwde schijfeenheid en een 
aanmerkelijk krachtiger Basic. 
Over de prijs die in Nederland 


niets bekend. De Plus/4 en de 
C16 zijn in het eerste nummer 
van Commodore Dossier uitvoe- 
rig beschreven. Bij Commodore 
Nederland gelooft men dat er in 
1985 in ons land zo’n 200.000 
huiscomputers over de toonbank 
zullen gaan. Dat is net zoveel als 


het totale aantal dat tot en met 
december vorig jaar is verkocht. 


zal gaan gelden, was bij het ter 
perse gaan van dit nummer nog 


COMMODORE 
VERDRINGT SINCLAIR 


In Engeland strijden Commodore en Sinclair nog steeds in alle hevig- 
heid om een eerste plaats in de gunst van de computer-hobbyist. In 
Nederland lijkt die strijd gestreden en de overwinning is duidelijk aan 
Commodore. Dat mag tenminste worden geconcludeerd uit cijfers van 
MCN. MCN staat voor Microcomputer Club Nederland, een activiteit 
van V&D en Dixons. Bijna 90 procent van de leden van die club heeft 
gekozen voor een Commodore-64 en ruim 10 procent behelpt zich dus 
met een Sinclair computer. 


COMMODORE’S BELOOFDE 
KRAKER: AMIGA 


Als alles goed gaat, brengt Commodore in de loop van dit jaar een re- 
volutionaire machine op de markt, die de concurrentie zal doen ver- 
bleken, Dat hoor je tenminste in de wandelgangen van het bedrijf. Het 
apparaat waar het om gaat, voorlopig ’Amiga’ gedoopt, heeft als be- 
langrijkste kenmerk dat het zowel de programmatuur van Apple Mac- 
intosh als de IBM PC kan verwerken. Beide machines zijn momenteel 
buitengewoon succesvol. De Macintosh van Apple is momenteel wel 
zo ongeveer het summum van gebruiksvriendelijkheid. Met een zoge- 
heten muis kan de gebruiker, door tekeningen op het scherm aan te 
wijzen, vrijwel alle functies uitvoeren. Met name de grafische moge- 
lijkheden van de ’Mac’ zijn nog steeds ongeévenaard door andere 
computers. 

De IBM PC is sinds zijn introductie in 1982 vooral voor zakelijke toe- 
passingen een regelrecht kassucces geworden voor de computergigant. 
Het apparaat is zo’n beetje de industrie-standaard geworden en de 
hoeveelheid programmatuur die er voor te krijgen is, past al lang niet 
meer in een flinke computershop. 

Tot nu toe werd door insiders eigenlijk aangenomen dat het ondoen- 
lijk is een redelijk geprijsde microcomputer te maken die tegelijk met 
de Macintosh en de IBM PC uitwisselbaar is. Maar Commodore blijft 
met klem beweren dat de Amiga in de eerste helft van dit jaar zal wor- 
den geintroduceerd. Sterker nog: de Amiga biedt de gebruiker in te- 
genstelling tot de Macintosh ook nog kleurenplaatjes. Naar verluid 
moet de Amiga in Amerika minder gaan kosten dan de Macintosh van 
Apple. Wanneer de machine in Nederland zal worden uitgebracht en 
wat hij dan precies gaat kosten, is nog niet bekend. 


PLOTTERPENNEN 
BlJ TANDY GOEDKOPER 


ben. Radio Shack (Tandy) ver- 
Koopt passende plotterpennen in 
sets van 3 zwarte (catalogus- 


Bezitters van de 1520 plotter 
Kennen het probleem: van de 
sets met pennen is altijd de 


zwarte het eerst op. Nieuwe sets 
zijn moeilijk te krijgen en bo- 
vendien blijft de gebruiker na 
verloop van tijd met een over- 
vloed aan gekleurde pennen zit- 
ten. K. Drechsel bleek er in Hot 
News iets op gevonden te heb- 


nummer 26-1480) of 1 rode, I 
groen en I blauwe (nr. 
26-1481). De sets kosten f 8,90 
(3 stuks dus) terwijl een set van 


4 pennen bij Commodore maar 
liefst f 25,— kost. 








LAATSTE NIEUWS 


Niet de introductie van de 
C-128 was de grote verrassing 
bij Commodore op de onlangs 
gehouden CES in Las Vegas, 
maar de Commodore LCD, 
een draagbare computer met, 
de naam zegt het al, een groot 
opklapbaar LCD-scherm. 

De C-128 bleek er overigens 
professioneler uit te zien dan 
verwacht, het fraaie toetsen- 
bord heeft onder meer een 
apart numeriek gedeelte. De 
machine heeft drie micro- 
processors ingebouwd en kent 
dan ook drie ’modes’ of 
werkstanden. In de C-128 mo- 
de bedient hij zich van een 
nieuwe Basic-versie 7.0 De 
nieuwe 8-bit 8502 processor 
van deze mode is compatibel 
met de 6502 (0.a. BBC). In de- 
ze stand heeft de computer 
48K Rom voor het Basic be- 
schikbaar en 16K voor het ver- 
beterde besturingssysteem. In 
de C-64 stand, met de 6410A 
microprocessor, is de C-128 





volledig compatibel met de 
Commodore 64. Onder de der- 
de mode, met microprocessor 
Z80A draait alle software on- 
der besturingssysteem CP/M 
3.0, zoals Wordstar en dBase 
Il. Op de CES werden voor de- 
ze opmerkelijke machine prij- 
zen gehoord van rond de 300 
dollar, waarmee de Plus/4 dan 
wel kan inpakken. 

De Commodore LCD heeft een 
LCD-scherm van 80 kolommen 
bij 16 regels. In het 96K Rom- 
geheugen bevindt zich onder 
veel meer het Basic, een tekst- 
verwerker en een spreadsheet. 
De draagbare computer be- 
schikt over een ingebouwd 300 
Baud modem. Het communica- 
tieve karakter van de machine 
spreekt onder meer uit een he- 
le rist poorten aan de achter- 
zijde. Aan werkgeheugen is 
382K beschikbaar. Als prijs- 
indicatie werd voor de nieuwe 
machine 500 dollar op- 
gegeven. 


GERUCHTEN OVER 
PLUS/4 EN C-16 


De introductie van de nieuwe 
machines van Commodore, de 
C-16 en de Plus/4 komt maar 
moeizaam op gang. Binnen de 
gebruikersgroepen lijkt het ani- 
mo om met de nieuwe machines 
in de slag te gaan niet erg 
groot. Vrij algemeen is men en- 
thousiast over het fraaie Basic 
van de nieuwe machines, maar 
blijkbaar zit men met handen 
en voeten vast aan de oude ver- 
trouwde CBM-64. In dat licht 
moet waarschijnlijk ook de vrij 
plotselinge introductie van de 
128 worden gezien, een moder- 
ne, krachtiger versie van het 
succesnummer van Commodore. 
Inmiddels is er een geruch- 
tenstroom op gang gekomen 


over de C-16 en vooral over de 
Plus/4. De doorgaans zeer be- 
trouwbare Wallstreet Journal ci- 
teerde onlangs een topman van 
Commodore die een mislukte 
poging deed om de snelle ko- 
pers van de Plus/4 in Amerika 
gerust te stellen. ’’Als de Plus/4 
uit de markt zou worden geno- 
men,”’ aldus die zegsman,’’dan 
blijft Commodore de kopers 
van het eerste uur ondersteu- 
nen.” Dergelijke uitspraken zijn 
in de computer-business vaak 
een teken aan de wand. Overi- 
gens ontkent Commodore Ne- 
derland in alle toonaarden dat 
er sprake zou zijn van uit de 
markt nemen van de C-16 en 
Plus/4,<4 











HANDLEIDING 
BIJ DE LISTINGS 


Wie regelmatig listings uit tijdschriften of boeken intikt, kent het probleem: na uren van moeizaam turen en intikken, brengt het 
verlossende "RUN’ geen uitkomst. Het programma blijft hangen. Meestal is een knullige tik-fout de la maar begin maar 
eens te zoeken. Met een eigen Sete en een eigen checksum of controle-getal-programma hoopt Commodore 
Dossier die problemen voorgoed uit de wereld te helpen. 


CONVERSIE- 
PROGRAMMA 

De beruchte besturingstekens van Com- 
modore zijn vaak de oorzaak van fouten in 
zelf ingetikte listings. De symbolen zijn in 
drukwerk vaak moeilijk te lezen en dus 
snel oorzaak van een vergissing. Met Ba- 
sic worden deze besturingstekens op- 
geslagen door middel van een getal van 0 
tot 255, de zogenaamde Commodore 
ASCll-code. Zo wordt het dia-positieve 
hartje "CLEAR’ opgeslagen als het getal 
147. Wij maken van dit gegeven gebruik 
om de listings van Commodore Dossier 
makkelijk leesbaar te maken. Door het ge- 
tal dat bij een bepaald besturingsteken 
hoort in een zogenaamde characterstring 
(chr$) te zetten, krijgen we hetzelfde resul- 
taat als bij het gebruiken van een bestu- 
ringsteken. 

In boeken en tijdschriften worden twee ma- 
nieren gebruikt om de moeilijk leesbare 
Commodore-tekens te vermijden. Om bij 
het voorbeeld CLEAR te blijven: 

1. print [shift clr home]. Op het scherm ver- 
schijnt een diapositief hartje. De afspraak 
bij deze methode is dat alles tussen de 
spekhaakjes uitgevoerd moet worden en 
dus niet moet worden overgetikt. 

2. print chr$(147). Bij het RUNnen van het 
programma zorgt deze regel er voor dat 
het scherm wordt schoongemaakt. 

De characterstrings bij de besturingste- 
kens staan vermeld in het handboek. 


Voortaan zullen we in onze listings dus uit- 
sluitend gebruik maken van charac- 


Dossier voortaan een stuk leesbaarder zijn. 
Dat neemt niet weg dat een tik-foutje nog 
snel is gemaakt. Het vervelende van die tik- 
fouten is dat ze pas worden ontdekt als het 
programma nietblijktte lopen. Dat probleem 
wordt uit de wereld geholpen door het on- 
derstaande controle-programma, in het En- 
gels meestal Checksum genoemd. 

Het controle-programma controleert aan de 
hand vaneen letter en een cijfer die uaan het 
eind van elke regel intikt, of de betreffende 
regel correct is ingevoerd. Is er een fout ge- 
maakt bij het intikken, dan verschijnt op het 
scherm de zin: FOUT IN REGEL en wordt de 
betreffende regel niet in het programma op- 
genomen. Dat betekent dus overtikken. Het 
controle-getal-programma dat hieronder is 
afgedrukt, moet dus altijd eerst worden gela- 
den en geRUNd voordat u met het intikken 
van een listing begint. 

Het feitelijke controlegetal bestaat uit een 
letter en een cijfer, voorafgegaan door 
[shift][spatie]. 

Dat lijkt misschien wat minder elgant, om- 
dat we met ons conversie-programma juist 
die spekhaakjes uit de listings gebannen 
hebben, maar in de praktijk zal blijken dat 
door deze methode het controle-getal di- 
rect als zodanig herkenbaar is. Het tegelijk 
indrukken van shift en spatie ziet er op het 
scherm uit als een gewone spatie, de com- 
puter weet nu echter dat het controlegetal 
er aan komt. 

Om u zoveel mogelijk handenarbeid te 
besparen, hebben we aan het programma 


CHECKSUMPROGRAMMA 


terstrings. Ervaren programmeurs en ze- 1 rem checksumprogramma 
ker de programmeurs die in opdracht van A oe one Ge iebmnedore, 64 
. rm rem 
Commodore Dossier werken, zijn trouwens 4 rem peter de zeeuw 
5 em 


niet anders gewend. Als u thuis echter nog 
een listing heeft liggen die op de gewone 
manier is gemaakt en u vindt dat andere le- 
zers van Commodore Dossier van dat pro- 
gramma moeten meegenieten, dan is dat 
geen probleem. Met behulp van een 
CONVERSIE-PROGRAMMA kunnen wij 
elke listing aanpassen. Natuurlijk bespaart 
u de redactie een hoop werk als u zelf de 
conversie alvast uitvoert. 


30 sys49155:new 





LET WEL: [shift][spatie] MOET U NIET INTIK- 


KEN, DAT MOET U DOEN. VOORDAT U DE 


LETTER EN HET CIJFER INVOERT, MOET U 
TEGELIJKERTIJD DE SHIFT-TOETS EN DE 
SPATIEBALK INDRUKKEN. 





nog een paar snufjes toegevoegd. Zo mo- 
gen spaties die niet tussen aanhalingste- 
kens staan, worden weggelaten, dat levert 
geen foutmelding op. Het gebruik van af- 
kortingen wordt ook niet bestraft. PRINT 
kan bijvoorbeeld worden afgekort met ?. 
Ons slimme controle-programm begrijpt 
dat en geeft geen foutmelding. 

Het feitelijke controle-getal bestaat uit een 
letter en een cijfer. Dat noemen we hexa- 
decimale getallen. Die gebruiken we onder 
meer om de eenvoudige reden dat ze kor- 
ter zijn dan gewone decimale getallen. 
Als u klaar bent met het intikken van een 
programmazlisting, kunt u de controle- 
functie uitschakelen met de instructie SYS 
49152. Het aanzetten gebeurt met SYS 
49155. 


NOTA BENE 
Het controle-programma is uitsluitend bedoeld voor 
de CBM-64. Aan een aanpassing voor de Vic 20 
wordt gewerkt. We willen even bekijken of daar 


voldoende belangstelling voor is. Dat zal uit de 
post moeten blijken. Zodra de nieuwe machines 


van Commodore een beetje onder de mensen zijn, 
zullen beide programma’s in elk geval voor die ma- 





chines worden aangepast. 





10 fori=49152t049412:reada:pokei,a:x=x+a:next 
20 ifx<>31526thenprint"fout in dataregels":stop 


49152 data76,83,228,162,0,189,17,192,157,2,3,232,224,4,208 
49167 data245,96,21,192,46,192,32,96,165,134,122,132,123,32 
49181 datall5,0,170,240,243,162,255,134,58,144,6,32,124,165 
49195 data76,225,167,32,107,169,166,122,202,232,189,0,2,240 
49209 dataBl,201,160, 208 ,246,169,0,157,0,2,232,32,221,192 
49223 datal76,66,232,32,221,192,176,60,32,124,165,132,11,169 
49237 datal,133,15,165,20,69,21,¢133 , 251 160.5) 185,25171,72 
49252 data201,34,208,6,165,15,73,255,133,15,36,15,48,7,104 
49267 data201,32,240,7,208,1,104,69,251,133,251,200,196,11 
49281 datal44,221,240,219,165,251,197,252,240,54,162,0,189 
49294 data206,192,240,6,32,210,255,232,208,245,169,9,141,5 
49308 data212,169,0,141,6,212,169,15,141,24,212,169,25,141 
49322 datal,212,169,177,141,0,212,169,17,141,4,212,32,196 


CONTROLE- 49336 data PUL) «LG; d 218, Mh Bele) 7 ol ek b brie LES 
29350 datal62,105,30,197,162,208,252,96,70,79,85,84,32, 
PROGRAMMA 49364 data78, 32,82, 69, 71,69, 76,13 ,0,6,252,6252 6,252 167252 


Dank zij het conversie-programma dat 
besturingstekens vervangt door charac- 
terstrings, zullen de listings in Commodore 





49381 datal89,0,2,240,23,56,233,48,144,18,201,10,144,8,233 
49396 data7,144,10,201,16,176,7,101,252,133,252,144,1,56,96 
49411 data32,202 
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TIPS & TRUCS 


Maandelijkse rubriek met korte programma’s, routi- 


nes en utilities. nee viezen van binnen- 


en buitenlandse pro 


essionals. Lezers helpen lezers. 


Het zijn de kleine dingen die het doen. Tips & trucs 
van lezers worden, indien geplaatst, beloond met 50 


guiden. 


DUMPEN, PLAKKEN EN 


VRAGEN 


In het interview met Jan van 
Die (pagina 8) is sprake van 
een boek dat Van Die en colle- 
ga Volders binnenkort uitbren 


SCREENDUMP 
Omschrijving: Met het on- 
derstaande programma kunt u 
alles wat op uw beeldscherm 
staat naar de printer sturen. 


SCREENDUMP 


spatie>98 


ie>92 
100 
110 
120 
130 
140 





150 


gen. In overleg met uitgever 


Kluwer, koos Van Die een drie- 
tal pagina’s uit het boek, die 
we hier integraal overnemen. 






Instructie: Neem het volgende 
programma nauwkeurig over 
en SAVE het voor u het in 


werking stelt. 









0 rem screendump<shift>/<spatie>8f 

10 printchr$(19);<shift>/<spatie>66 

20 z2=(peek(210))*256<shift>/<spatie>ca 

30 open3,3<shift>/<spatie>ad 

40 openl, 4<shift>/<spatie>9e 

50 fory=0to24:b$=""<shift>/<spatie>24 

60 forx=0to039:a$=""<shift>/<spatie>24 

70 ifpeek(zzt+((y*40)+c) )>127thenget#3,a$:b 
$=b$+chr$(18)+a$+chr$(146):gotoll0<shift>/< 


80 get#3,a$<shift>/<spatie>a8 
90 ifaS$=chr$(13)thena$s=" "<shift>/<spat 


b$S=b$+a$<shift>/<spatie>19 
nextx<shift>/<spatie>b4 
print#l,b$<shift>/<spatie>9b 
nexty<shift>/<spatie>59 
closel<shift>/<spatie>ld 
close3<shift>/<spatie>05 





APPEND (ALGEMEEN) 


Omschrijving: Door middel van 
onderstaande techniek kunt u 
uw favoriete subroutines aan 
elk willekeurig programma toe- 
voegen. 

Instructie: U moet er van te 
voren voor zorgen dat het 
twee programma hogere regel- 
nummers heeft dan het eerste. 
Vervolgens voert u de volgen- 
de stappen uit: 

1) laad het eerste programma. 
2) geef de computer de op- 
dracht: 

PRINT PEEK(43)PEEK(44) 
PEEK(45) 

Schrijf de getallen die de com- 
puter meldt op. 


3) Gebruik het derde getal om 
de volgende opdracht te 
vinden: 

getal 3>2: 

POKE43,PEEK(45) — 2 

getal 3 = 2:POKE43,0 

getal 3=1: 
POKE43,255:POKE44, 
PEEK(46) - 1 

getal 3=0: 
POKE43,254:POKE44, PEEK 
(46) - 1 

4) laad het tweede pro- 
gramma. 

5) POKE 43 met het eerste en 
POKE 44 met het tweede op- 
geschreven getal. 

6) geef de opdracht LIST. 










RANDOM VRAGEN 
Omschrijving: U heeft een pro- 
gramma gemaakt dat de ge- 
bruiker een aantal vragen stelt. 
U wilt dat deze vragen niet el- 
ke keer in dezelfde volgorde 
gesteld worden en dat geen 
enkele vraag een tweede keer 


RANDOM VRAGEN 


















100 
110 
120 
130 








MERGE 

Merge staat voor samenvoe- 
gen van programma’s. In het 
Basic van de Commodore 64 
is hiervoor geen commando 
beschikbaar. Met de volgende 
korte machine-code routine 
kan het toch. Om deze routine 
te gebruiken moet eerst het 
eerste gedeelte van het pro- 
gramma worden geladen, 
waarna deze routine wordt toe- 
gevoegd en het geheel wordt 
geRUNd. Vervolgens tikt u 


MERGE 





1010 





ft>/<spatie>ef 








46<shift>/<spatie>ab 






43<shift>/<spatie>89 


ad 





1000 rem merge voor cbm 64<shift>/<spatie>76 
:<shift>/<spatie>cb 
1020 fori=40448t040478:reada:pokei,a:next<shi 


aan de orde komt. De on- 
derstaande demonstratie leert 
u hoe u dit aan moet pakken. 
Instructie: Bestudeer het vol- 
gende programma nauwkerig 
en pas het naar eigen behoef- 
te aan: 












10 fori=0to4<shift>/<spatie>d0d 

20 reada$(i)<shift>/<spatie>be 

30 next<shift>/<spatie>9c 

40 data"vraag 1","vraag 2","vraag 3","vraag 
4","vraag 5"<shift>/<spatie>£9 

50 v=5<shift>/<spatie>e3 

60 x=rnd(-ti)<shift>/<spatie>da 

70 ifv=0thenend<shift>/<spatie>3e 

80 x=rnd(0)*5<shift>/<spatie>a9 

90 ifa$(x)=""then70<shift>/<spatie>ff 
printa$(x)<shift>/<spatie>cl 
a$(x)=""<shift>/<spatie>ed 
v=v-l<shift>/<spatie>50 
goto70<shift>/<spatie>0c 





SYS 40448 in. Daarna laadt u 
het tweede programma en tikt 
vervolgens SYS 40468 in. De 
programma’s zijn nu samenge- 
voegd. Vergeet niet de routine 
uit het geheugen te halen na- 
dat u hem heeft gebruikt. De 
regelnummers van het tweede 
programma moeten hoger zijn 
dan die van het eerste. Als dat 
niet het geval is, werkt de rou- 
tine wel, maar de nummering 
wordt een rotzooitje. 













1030 data216,56,173 745 ,0,233;,2,141 ,43,0,173, 
1040 data0,141,44,0,96,234,234,234,169,1,141, 


1050 data0,169,8,141,44,0,96<shift>/<spatie> 





PROGRAMMAS OP 
CASSETTE OF SCHIJF 


Als blijkt dat daar bij de lezers van Commodore Dossier behoefte 
aan bestaat, worden een aantal programma’s uit Commodore Dos- 
sier op cassette of schijf uitgebracht. Het eerste programma dat 
daarvoor in aanmerking komt, is natuurlijk onze tekstverwerker. 
Maar we denken ook aan een cassette of een schijf met een aantal 
kortere programma’s zoals onze checksum, een conversieprogram- 
ma, de sprite-editor en dergelijke. Wij wachten even Op uw reactie. 















































































































































CLEAR 
Het volgende programma werd wordt. Dit programma zet de gramma kan ook van pas ko- _—‘oude’ variabelen uit het ge- 
opgestuurd door F. Gijsbertse — variabelen in aparte geheugen- men bij gebrek aan geheugen- heugen worden gelezen. 


uit Amersfoort, het spaart vari plaatsen zodat ze met CLR ruimte. Een programma wordt Na het RUNnen van dit pro- 
abelen voor de CLEAR-functie. niet worden gewist. Met PRINT met NEW gewist nadat de va- gramma zijn de variabelen uit 
Een programma met veel vari- wordt de variabele in het riabelen in het schermgeheu- Z, Y en X$ verdwenen, maar 


abelen kan erg langzaam wor- schermgeheugen gezet, waar- gen zijn opgeslagen. Als met zijn de ingegeven variabelen in 
den. Helaas worden alle varia- _uit ze altijd makkelijk kunnen LOAD het volgende program- V1, V2 en VA$ bewaard ge- 
belen gewist als geCLEARD worden teruggelezen. Het pro- ma wordt geladen, kunnen de _ bleven. 








CLEAR 


, 


1 rem met het geven van het “clr” commando verdwijnen de variabelen<shift>/<spati 
e>99 
2 rem door een handigheidje blijven sommigen gespaard<shift>/<spatie>89 
3 rem dit wordt gedaan door ze weg te zetten in het geheugen<shift>/<spatie>96 
4 rem de 1000 bytes van het scherm zijn hiervoor het meest geschikt.<shift>/<spat 
ie>e4 
5 rem door een eenvoudige print wordt de variabele in het geheugen<shift>/<spatie 
>de 
6 rem gezet. het scherm heeft het voordeel dat niet “gepoked” hoeft<shift>/<spati 
e>fa 
7 rem te worden.<shift>/<spatie>b2 
8 rem bij kleine getallen (<0.01) werkt het niet door de esnotatie.<shift>/<spati 
e>f£5 
9 :<shift>/<spatie>33 
10 z=12:y=3.98:xS="test"<shift>/<spatie>ce 
20 input"va #1";vl<shift>/<spatie>es 
30 input"va #2"sv2<shift>/<spatie>e2 
.40 input"uw naam ";vaS$<shift>/<spatie>84 
50 printchr$(147);<shift>/<spatie>64 
60 printchr$(31): rem achtergrond kleur<shift>/<spatie>c8 
62 :<shift>/<spatie>04 
rem de variabelen worden nu n de achtergrond kleur geschreven<shift>/<spatie> 






















































66 rem en zijn dus onzichtbaar.<shift>/< spatie>e0 
68 :<shift>/<spatie>7e 
70 printvl : rem schermgeheugen # 1064 is 
het begin vd regel waar vl staat<shift>/<spatie>47 
80 printv2 : rem idem.# 1104<shift>/<spatie>3a 
90 printva$: rem idem # 1144<shift>/<spatie>63 
100 clr<shift>/<spatie>f£8 
110 i=0<shift>/<spatie>ad 
120 a=peek(1064+i) :a$=chr$(a)<shift>/<spatie>c2 
130 vlS=vlStaS$<shift>/<spatie>ff 
140 ifa$<>chr$(32)ori=O0theni=i+l:gotol20<shift>/<spatie>d2 
150 i=0<shift>/<spatie>5d 
160 a=peek(1104+i):aS=chr$(a)<shift>/<spatie>ld 
170 v2S=v2Sta$<shift>/<spatie>d7 
180 ifa$<>chr$(32)ori=O0theni=i+1:gotol60<shift>/<spatie>ee 
190 i=0<shift>/<spatie>75 
200 a=peek(1144+i) :a$=chr$(a+64)<shift>/<spatie>d9 
210 vaS=vaSta$<shift>/<spatie>af 
220 ifa$<>chr$(32+64)theni=i+1l:goto200<shift>/<spatie>50 
221 :<shift>/<spatie>e7 
225 rem voor letters is de peek-waarde niet gelijk aan de ascii-waarde<shift>/<s 
patie>29 
226 rem hierdoor ontstaan problemen met de chr$-funktie<shift>/<spatie>72 
227 rem het verschil is 64<shift>/<spatie>31l 
228 :<shift>/<spatie>de 
230 vl=val(vl$)<shift>/<spatie>b4 
240 v2=val(v2$)<shift>/<spatie>a2 
250 i=len(vaS$)<shift>/<spatie>f0 
260 vaS=left$(va$S,i-l):rem hetteken met code 32+64 dumpen<shift>/<spatie>42 
270 printchr$(147):printchr$(154)<shift>/<spatie>37 
280 print"z="Z,"y="y,"xS="x$<shift>/<spatie>bd 
290 print<shift>/<spatie>ba 
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LISTINGS VAN LEZERS 


Het beste uit POSTBUS 9194. De programma’s die in deze rubriek worden geplaatst, worden beloond met 50 guiden. Voorwaar- 
de is dat ze origineel zijn. Inzenders vrijwaren de redactie van plagiaat. De te alo bij voorkeur inzenden op schijf of cas- 
sette, zodat we zeker weten dat ze ‘lopen’. Gedrukte programma’s moeten in elk geval van characterstrings in plaats van 
hesturingstekens zijn voorzien. De beste pn 5 uit deze rubriek kunnen in Acne komen om door COMMODORE DOS- 
SIER in samenwerking met een software-bedrijf commercieel op de markt te worden gebracht. In dat geval staat de auteur alle 


rechten van het programma af aan Commodore Dossier in ruil voor een wettelijk geregeld deel van de opbrengst. 


VOETBALPROGNOSE 

Met dit programma van Paul voet worden gevolgd. Elk vervolgens een prognose voor lier invullen. Tenzij u tot de 
Spruit en Cees Duivenvoorde = weekend na Studio Sport moe- de uitslagen van de volgende = mensén behoort die denken 

uit Beverwijk kan de vader- ten de uitslagen worden inge- week. Aan de hand van die meer verstand van voetballen te 
landse voetbalcompetitie op de voerd. Het programma doet prognose kunt u uw totoformu- hebben dan de Commodore 64. 


VOETBALUITSLAGEN 


10 poke53280,0:poke53281,0:poke646,5:fork=49152t049188:readq:pokek,q:next<shift>/ 

<spatie>9f 

20 printchr$(147)"voetbalprognose door p. spruit";<shift>/<spatie>69 

21 forxx=lto5:printchr$(17);:next:print<shift>/<spatie>c5 

30 print"1l laden gegevens van tape/disk":print"2 saven gegevens naar tape/disk"<s 

hift>/<spatie>6f 

40 print"3 prognoses maken":print"4 invoeren uitslagen":print"5 ranglijst"<shift> 

/<spatie>ab 

50 ifa=Othenprint"6 elftallen invoeren"<shift>/<spatie>2l 

60 geta$:ifval(a$)<lorval(a$)>6or(val(a$)=6anda>0)then60<shift>/<spatie>a6 

70 onval(a$)gosub1000, 2000, 3000, 4000,5000,6000:goto20<shift>/<spatie>6l 

100 datal69,4,133,100,169,80,133,99,160,40,177,99,160,0,145,99,166,99,224,111<shi 

ft>/<spatie>c7 

110 data240,8,230,99,208,238,230,100,208,234,166,100,224,7,208,242, 96<shift>/<spa 

tie>dc 

150 dima$(a),a(a),b(a,a),c(a),d$(a),e(a),f£(a),g(a),h(a):return<shift>/<spatie>c0 

1000 printchr$(147)"laden gegevens van tape of disk ?":clr<shift>/<spatie>16 

1010 geta$:ifa$S="t"thenprintchr$(19)tab(23)" ":b=1:gotol040<shift>/<spat 

ie>3l 

1020 ifaS="d"thenprintchr$(19)tab(19)"disk ":b=8:gotol040<shift>/<spatie 

>c4 

1030 gotol010<shift>/<spatie>8b 

1040 input"onder welk file-nummer staan de gegevens";f:q$="data"+str$(f)<shift>/< 

spatie>2e 

1041 ifb=8theng$=q$+",s,r"<shift>/<spatie>e8 

1045 iff>l27orf<lthenprintchr$(145)chr$(1 45);:gotol040<shift>/<spatie>9e 

1050 open2,b,0,q$:input#2,a:gosub150:fork=ltoa:input#2,a$(k) :next:fork=ltoa<shift 

>/<spatie>cd 

1055 input#2,a(k) :next:fork=ltoa:input#2,c(k):next:fork=ltoa:input#2,g(k):next<sh 

ift>/<spatie>36 

1060 fork=ltoa:forl=ltoa:input#2,b$:b(k,1)=val(b$) :next:next<shift>/<spatie>99 

1070 close2:gotol0<shift>/<spatie>0a 

2000 ifa=Othenprintchr$(147)"er zijn nog geen gegevens ":fort=1to2000:next:return 

<shift>/<spatie>f2 

2010 printchr$(147)"saven gegevens naar tape of disk ?"<shift>/<spatie>ce 

2020 geta$:ifaS="t"thenprintchrs$(19)tab(24)" ":b=1:goto2050<shift>/<spat 

le>26 

2030 ifaS="d"thenprintchr$(19)tab(20) "disk ":b=8:goto2050<shift>/<spatie 

>da 

2040 goto2020<shift>/<spatie>76 4 

2050 input"onder welk file-nr. moeten de gegevens worden gesaved";f<shift>/<spat 

ie>f9 

2055 iff>127orf<lthenprintchr$(145)chr$(145);:goto2050<shift>/<spatie>82 

2056 q$="data"+str$(f)<shift>/<spatie>fe 

2057 ifb=8thenqS=q$+",s,r"<shift>/<spatie>fc 
open2,b,1,q$:print#2,a:fork=ltoa:print#2,a$(k) :next:fork=ltoa<shift>/<spatie 
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print#2,a(k):next:fork=ltoa:print#2,c(k):next:fork=ltoa:print#2,g(k):next<sh 
ift>/<spatie>28 
2070 fork=ltoa:forl=ltoa:a$=str$(b(k,1)):print#2,a$:next:next<shift>/<spatie>ba 
2080 close2:return<shift>/<spatie>0de 
3000 ifa=0then2000<shift>/<spatie>5Se 
3010 printchr$(147)"prognoses maken":printchr$(17)"hoeveel wedstrijden";<shift>/< 
spatie>e9 
3015 inputa$:ifval(a$)=O0thenreturn<shift>/<spatie>97 
3020 c=val(a$):printchr$(17)"wedstrijd 


j a ro ms = ° 
printchr$(17)<shift>/<spatie>7a ae ene ae 















3030 printchr$(145)k;:inputa$<shift>/<spatie>18 
3035 form=ltoa:ifleft$(a$(m),len(a$) )<>aSthennext:goto3030<shift>/<spatie>5l 


3040 printchr$(145)a$(m)" "tab(20);:inputa$:forl=ltoa<shift>/<spatie>55 
3050 iflefts(a$(1),len(a$) )<>a$thennext :goto3040<shift>/<spatie>f6 
3060 printchr$(145)tab(20);a$(1)" ".ifl=mthen3040<shift>/<spatie>89 


3070 d=g(m) *a(m)/3:forn=ltoa:d=d+b(m,n) *a(n) :next:a$="3"<shift>/<spatie>2e 

3080 e=g(1)*a(1)/3:forn=ltoa:e=e+b(1,n)*a(n):next:ifd>e*l . 4thena$="1"<shift>/<spa 
tie>c6 

3090 ifd<e*.75thena$="2"<shift>/<spatie>ed 

3100 printchr$(145)tab(37);a$:nextk<shift>/<spatie>5c 

3105 "chr$(17)"“spatie” om terug naar menu te keren"<shift>/<spatie>ec 

3110 geta$:ifa$<>" "then3110<shift>/<spatie>be 

3120 return<shift>/<spatie>b2 

4000 ifa=Othenprintchr$(147)"er zijn geen ploegen ingevoerd":fort=l1to2000:next:re 
turn<shift>/<spatie>£7 

4010 printchr$(147)"invoeren uitslagen"<shift>/<spatie>b0 

4015 printchr$(17)chr$(17)"hoeveel uitslagen wilt u invoeren";:inputa$<shift>/<sp 
atie>8b 

4020 c=val(a$):ifc=0thenreturn<shift>/<spatie>b2 

4025 printchr$(17)chr$(17)chr$(17):al=0:fork=ltoc<shift>/<spatie>b3 

4030 printk":";:inputa$:forl=ltoa<shift>/<spatie>29 

4040 iflefts(a$(1),len(a$) )<>a$thennext<shift>/<spatie>64 

4045 ifl>athenprintchr$(145);:goto4030<shift>/<spatie>b2 

4050 printchrs$(145)k":"a$(1)" "tab(18)"-";:inputa$:form=ltoa<shift>/<spatie>34 
4060 ifleft$(a$(m),len(a$) )<>aSthennext<shift>/<spatie>71 

4065 ifm>aorl=mthen4050<shift>/<spatie>7d 


4070 printchr$(145)k":"a$(1);tab(18)"-"a$(m)" "tab(29);:inputa$:d=val(a$)<shift> 
/<spatie>6e 

4075 printchrs$(145)tab(27)" "<shift>/<spatie>04 

4080 printchr$(145)k":"a$(1);tab(18)"-"a$(m) ;tab(29)" "q" -";tab(33);:inputa$<shi 
ft>/<spatie>f6 

4085 e=val(a$)<shift>/<spatie>ac 

4090 printchr$(145)k":"a$(1);tab(18)"-"a$(m);tab(29)" "qa" -"etab(33)" "e" "<shift 
>/<spatie>58 


4094 print"ok(j/n)"<shift>/<spatie>46 
4095 geta$<shift>/<spatie>34 


4096 ifaS="n"thenprintchr$(145)" "chr$(145):goto4030<shift>/<spatie>a8 

4097 ifa$<>"j"then4095<shift>/<spatie>18 ; 

4099 printchr$(145)" "sprintchr$(145);<shift>/<spatie>32 

4100 g(1)=g(1)+1:g(m)=g(m)+1:¢(1)=c(1)+d-e:c(m)=c(m)+e-d<shift>/<spatie>2e 

4110 ifd>ethena(1)=a(1)+2:b(1,m)=b(1,m)+2<shift>/<spatie>b8 

4120 ifd<ethena(m)=a(m)+2:b(m,1)=b(m,1)+2<shift>/<spatie>ac 

4130 ifd=ethena(m)=a(m)+1:a(1)=a(1)+1:b(1,m)=b(1,m)+1:b(m,1)=b(m,1)+1<shift>/<spa 


tie>97 . 
4140 nextk:return<shift>/<spatie>41l 
5000 ifal=lthen5070<shift>/<spatie>46 


5005 ifa=Othenprintchr$(147)"er zijn nog geen gegevens": fort=1to2000:next:return< 


shift>/<spatie>9b 

5010 printchr$(147)"even geduld a.u.b":print"de ranglijst wordt nu berekend":al=1 
<shift>/<spatie>d5 

5020 fork=1toa:d$(k)=a$(k) :e(k)=a(k) :£(k)=c(k) :h(k)=g(k) :next<shift>/<spatie>90 
5030 s=0:fork=2toa:ifd$(k)<d$(k-1)thengosub5200<shift>/<spatie>44 

5035 next:ifs=lthen5030<shift>/<spatie>fa 

5040 s=0:fork=2toa:iff(k)>£(k-1) thengosub5200<shift>/<spatie>50 

5045 next:ifs=lthen5040<shift>/<spatie>e3 

5050 s=0:fork=2toa:ifh(k) <h(k-1)thengosub5200<shift>/<spatie>58 

5055 next:ifs=lthen5050<shift>/<spatie>es8 

5060 s=0:fork=2toa:ife(k)>e(k-1)thengosub5200<shift>/<spatie>24 

5065 next:ifs=lthen5060<shift>/<spatie>9d 


5070 printchr$(147)" elftal pnt. wdstr. dls. "<shift>/<spatie>df 
5080 fork=ltoa:ifk>20then5130<shift>/<spatie>8e 
5090 ifk<lOthenprint" "s<shift>/<spatie>a6 


S095 printktab(2);d$(k)tab(20)e(k)tab(27)h(k)tab(34)£(k) :next<shift>/<spatie>be 
5100 printchr$(19);:forxx=1to23:printchr$(17);:next<shift>/<spatie>ee 

5105 print" “spatie” om terug naar menu te keren"<shift>/<spatie>7b 

5110 geta$:ifa$<>" "then5110<shift>/<spatie>75 

5120 return<shift>/<spatie>9a 

5130 printchr$(19):forxx=1to23:printchr$(17);:nextxx<shift>/<spatie>34 

5135 print" ’spatie” voor het volgende elftal"<shift>/<spatie>cb 

5140 geta$:ifa$<>" "then5140<shift>/<spatie>95 

5150 sys49152:printchr$(19);:forxx=1lto21:printchr$(17);:nextxx:goto5090<shift>/<s 
patie>39 

5200 s=1:cS=d$(k) :d$(k)=d$(k-1) :d$(k-1)=c$:c=e(k-1):e(k-1)=e(k) :e(k)=c<shift>/<sp 
atie>94 

5210 cC=£(k-1):£(k-1)=£(k):£(k)=c:c=h(k-1) :h(k-1)=h(k) :h(k)=c:return<shift>/<spati 
e>c0 

6000 printchr$(147)"elftallen invoeren":<shift>/<spatie>43 ; 

6001 printchr$(17)chr$(17)"hoeveel elftallen";:inputa:ifa<3then6000<shift>/<spati 
e>c2 

a. gosub150:fork=ltoa:print"elftal "sk; :inputaS(k) :next:return<shift>/<spatie 

> 
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Maandelijkse rubriek met listings van programma’s die waard ) in uw programma-bestand te worden opgenomen. 

Alle piacrarnaas zijn voorzien van een controle-getal zodat fouten bij het intikken vrijwel zijn uitgesloten. Het controle-getal 
wordt in elke regel vooraf gegaan i Se ie]. Deze twee woorden moet u niet intikken, maar u moet tegelijkertijd de 
Shifi-toets en de spatiebalk indrukken. Op het scherm ziet dat uit als een gewone spatie. Voor nader informatie over het 
controle-getal, zie de handleiding elders in dit nummer. 


fo? 
BIORITME -— <4 
Het volgende Bioritme- met wie u op pagina 9 een in- _ alleen tot zijn recht als er een = scherm. De conclusies die u 
programma werd ons ter be- terview kunt lezen. Dit is het printer op de computer is aan- aan de uitslag van een Bio- 
schikking gesteld door de pa- programma dat Toon zelf in gesloten. De uitgebreide uit- ritme-uitdraai verbindt, zijn uiter- 
ragnost Toon Hoendervangers zijn praktijk gebruikt. Het komt draaien vertellen meer dan het aard voor uw eigen rekening. 


BIORITME 


poke53280,15:poke53281,15<shift>/<spatie>31l 
printchr$(147)chr$(28)chr$(14)chr$(17);<shift>/<spatie>8d 
prantehrs (1:8 )" menu "<shift>/<spatie>70 
print,chr$(31)chr$(17)chr$(17)"1. bioritme (uitgebreid)"<shift>/<spatie>60 
print,chr$(17)"2. bioritme (kort)"<shift>/<spatie>4a 
print,chr$(17)"3. einde":pokel98,0:waitl98,1l<shift>/<spatie>27 
geth1$:onval(hl1$)goto50,1360,1700<shift>/<spatie>6éd 
open4,4:print#4,chr$(27):print#4,chr$(27)<shift>/<spatie>81l 
dimpr$(31),m$(12),d$(7),k$(20)::fori=ltol2:readm$(i):next:fori=lto7:readd$(i)< 

shift>/<spatie>5d 

70 next: fori=1to40:s$=s$+"-":next:ss=0<shift>/<spatie>la 

80 prs="(-) (0) (+)":gosub90:gotol30<shift>/<spatie>cc 

90 fori=lto3l:pr$(i)="-"snext:pr$(16)=chr$(33):return<shift>/<spatie>le 

100 datajanuari 31,februari 29,maart 31l,april 30,mei 31,juni 30,juli 31l<shift>/<s 

patie>f4 

110 dataaugustus 31,september 30,october 31,november 30,december 31l<shift>/<spati 

e>f0 

120 datazondag ,maandag ,dinsdag ,woensdag ,donderdag,vrijdag ,zaterdag ,<sh 

ift>/<spatie>d4 

130 readx:printchr$(147);:te=l:gosub920:printchr$ (147) ;:gosub920:hu=1:te=0<shift> 

/<spatie>f8 

140 printchr$(28)chr$(19)chr$(17)chr$(17)chr$(17)"welke maand wilt u"chr$(31)<shi 

ft>/<spatie>77 

1475) Spe (a) Sea Sy ech OTs) tt ";<shift>/<spatie>f2 

150 forxx=ltol0:printchrs(157);:nextxx:inputiS$:m=val(iS$)<shift>/<spatie>5a 

160 d=l:ifm<lorm>12thenprinttab(8)chr$(145)"fout":fori=1to0999:next:gotol40<shift> 

/<spatie>f6 

170 fori=ltolen(mS(m)):ifmid$(m$(m),i,1)="""thenl90<shift>/<spatie>88 

180 next<shift>/<spatie>36 

190 printtab(8)chr$(145)left$(m$(m),i)<shift>/<spatie>ea 

200 printchr$(28)chr$(19);:forxx=lto6:printchr$(17);:nextxx<shift>/<spatie>22 

205 print"van welk jaar"chr$(31):print"[na 1581] "chr$(191)" ";<shift>/<s 

patie>87 

210 forxx=ltoll:printchrs(157);:nextxx:inputiS: j=val(iS)<shift>/<spatie>18 

220 ifiS=chr$(191)thenprinttab(11)chr$(145)"fout":fori=ltol000:next:goto200<shift 

>/<spatie>d0d 

230 if j<1l00thenj=j+1900<shift>/<spatie>12 

240 if}<158lthen printtab(11)chr$(145)"fout";:fori=l1tol000:next:goto200<shift>/<sp 

atie>28 

250 printtab(10)chr$(145)j<shift>/<spatie>54 

260 printchr$(28)chr$(17)"wat is uw naam"chr$(31):inputn$<shift>/<spatie>f£8 

270 printchr$(28)chr$(17)chr$(17)"wat is uw geboortedag "<shift>/<spatie>4] 

275 print" (dd,mm,jj)"chr$(31):inputdd$,mm$,jj$<shift>/<spatie>f5 

280 dd=val(dd$):ifdd<lordd>3lthen285<shift>/<spatie>e3 

281 goto290<shift>/<spatie>aa 

285 poke214,11:printchrs(145)chr$(18)"geboortedag fout"chrs$(146):gosub360<shift>/ 

<spatie>14 

286 goto270<shift>/<spatie>a3 

290 mm=val(mmS$):ifmm<lormm>12then295<shift>/<spatie>d9 

291 goto300<shift>/<spatie>98 
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295 214,11:"chr$(145)chr$(18)"ma ingave fout"chrs$ (146) :gosub360<shift>/<spatie>a7 
296 goto270<shift>/<spatie>95 : 
300 jj=val(jj$):ifj5<100thenjj=354+1900<shift>/<spatie>fb 

310 ifjj>jthenpoke214,11:printchr$(145)"nog niet geboren":gosub360:goto270<shift> 
/<spatie>3b 

320 printchrs (145) "<shift>/<spatie>2e 

330 huS=str$(dd)+" asian ie at ee kee: (jj)<shift>/<spatie>f4 

340 printchr$(145)huS:ifhu=lthengosub940<shift>/<spatie>3b 

350 dd$=""smm$S=""3457S="":iS="":goto370<shift>/<spatie>ab 

360 fori=1to2000:next:printchr$(145);:fori=lto2l:print" ";:next:print:return<shif 
t>/<spatie>93 

370 ifss=lthen440<shift>/<spatie>ec 

380 printchr$(28)chr$(17)"vergelijken (j/n)":printchr$(31)<shift>/<spatie>c9 

390 getv$:ifvS<>"jJ"andv$<>"n"then390<shift>/<spatie>d3 

400 v=0:ifvS="n"then440<shift>/<spatie>ed 

410 v=l:print"geef 2e naam "sinputn2S<shift>/<spatie>5f 

420 printchr$(28)chr$(17)"geef de 2de datum ":print" (dd,mm,jj)"chr$(31)<shift>/< 
spatie>0c 

425 inputd2,m2,j2<shift>/<spatie>5c 

430 if 42<1l00thenj2=42+1900<shift>/<spatie>69 

440 k=int(.6+(1/mm) ):1=jj-k:o=mm+12*k:p=1/100<shift>/<spatie>7e 

450 z2l=int(p/4):z2=int(p):z3=int((5*1)/4):z4=int(13*(o+1)/5)<shift>/<spatie>ca 
460 2=24+23-22+21+dd-1:2=(2-(7*int(z/7)))+l<shift>/<spatie>ed 

470 print#4,"u werd geboren op een "d$(z):print#4,chr$(10)<shift>/<spatie>67 

480 3 $=str$(j):jj$=right$(jj$,2):ifhu=lthengosubl1l10<shift>/<spatie>a2 

490 ifm=3thenprint"mrt. “";:goto510<shift>/<spatie>6c 

500 printleft$(m$(m),3)". °":<shift>/<spatie>ad 

510 print jj$" "prS$:print:s=l<shift>/<spatie>0od 

520 ifm<3goto540<shift>/<spatie>f4 

530 £1=(365*j+d+31*(m-1)-int(.4*m+2.3)+int(j/4)-int(3/4*int(4/100)+1)):goto550<sh 
ift>/<spatie>fl 

540 fl=int(365*j+d+31*(m-1)+int(j-1)/4)-int(3/4*int((j-1)/100)+1)<shift>/<spatie 
>ad 

550 ifmm<3goto570<shift>/<spatie>94 

560 £2=(365*jj+dd+31*(mm-1)-int(.4*mm+2.3)+int(jj/4)-int(3/4*int(43j3/100)+1)):goto 
600<shift>/<spatie>d8 

570 £2=int(365*jj+dd+31*(mm-1)+int(jj-1)/4)-int(3/4*int((44-1)/100)+1) :goto600<sh 
ift>/<spatie>4a 

580 ifint(j/4)<>j/4thenx=28<shift>/<spatie>3c 

590 return<shift>/<spatie>c2 

600 ifd>lorv=0then670<shift>/<spatie>e7 

610 ifm2<3goto630<shift>/<spatie>a8 

620° £S=( 36544 2+02+3.1(m2-1) Hint: 44*m2+2s3) +1 ne 27 4) int (S/a sink (2/100) <ishit 
t>/<spatie>0de 

625 goto640<shift>/<spatie>c8 

630 £3=1nt(365* 7 2+d2+31*(m2-1)+int( 32-1) /4)-int(3/4*int (42-1) /100) +1) <shift>/<sp 
atie>f3 

640 vl=f1-f£2:v2=f£1-f£3:fori=lto3:a=18+5*i<shift>/<spatie>e6b 

650 v(i)=abs((vl- ne oe *a)-(v2-int(v2/a)*a))<shift>/<spatie>38 

660 v(i)=int(abs(v rr *100/(a/2)):next<shift>/<spatie>05 

670 x=val (rights ( ie 2)):ifx=29thengosub580<shift>/<spatie>06 

680 tee ee 

690 a=23:i=1:gosub700:a=28:1=2:gosub700:a=33:i1=3:gosub700:d=d+1:goto900<shift>/<s 
patie>a0 

700 k(i)=0:b=sin(1/a*360/(180/3.14)*q) :b=int(16+(15*b+.5)):ifi=lthenhuS="£"<shift 
>/<spatie>4a 

710 ifi=2thenhuS="e"<shift>/<spatie>ef 

720 ifi=3thenhuS="i"<shift>/<spatie>f4 

730 ifprs(b)="-"orpr$(b)="!"thenprs$(b)=hu$ :goto750<shift>/<spatie>27 

740 pr$(b)="*"<shift>/<spatie>lb 

750 ifb=140rb=15o0rb=16thenk(i)=1<shift>/<spatie>b6é 

760 ifi=3thengosub780<shift>/<spatie>ac 

770 return<shift>/<spatie>8f 

780 h$=str$(d):h$=(right$(h$,2)):ifda<0thengosub90<shift>/<spatie>lb 


790 h$=h$+" ":ifm= Sauna h$+"mrt.. ":goto8l0<shifts/<spatie>7e 

800 drS=hsS+leftS(m$S(m),3)+". a 

810 h$=hS+leftsS(mS(m Cae Pa ee een ees 

820 a suniaageae hy ateniee d$(z)+" "+h$+"  fysiek":s=s+l<shift>/<spatie>15 


830 ifk(2)=lthenk$(s)=d$(z)+" as emotioneel":s=s+l<shift>/<spatie>be 
840 ifk(3)=lthenk$(s)=d$(z)+" "+hs+" intellect":s=s+l<shift>/<spatie>98 
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850 fori=3ltolstep-1l:dr$=dr$+pr$(i):next:printdrs;:ifda>Othenprint<shift>/<spatie 


>da 

860 ifda<Othenforxx=1to24:printchr$(157);:next:print"voor uw geboorte!"<shift>/<s 
patie>07 

870 ifda=Othenforxx=ltoll:printchr$(157);:next:printchrs$(18)"geboortedag"<shift>/ 
<spatie>90 


880 ifhu=lthengosubl040<shift>/<spatie>49 

890 gosub90:return<shift>/<spatie>49 

900 ifd<=xgoto520<shift>/<spatie>af 

910 ifhu=lthengosub1140<shift>/<spatie>b6é 

915 rsS="":forxx=ltol0:rs$=rs$+chr$(183):next<shift>/<spatie>fc 

920 print," bioritmiek":print," "rs$:ifte=lthenreturn<shift>/<spatie>8f 

930 run<shift>/<spatie>2b 

940 cmd4:printchr$(2)"bioritme voor: ":print#4,chr$(3),spc(1)n$:print#4,chr$(10)<s 


hift>/<spatie>86 

950 print#4,chr$(2)"geboren op :":print#4,d$(z)chr$(3)d$,hu$<shift>/<spatie>b3 
960 print#4,chr$(10):print#4,chr$(2)spce(14)"bioritmische berekening van: "s<shi 
ft>/<spatie>3a 

970 ifm=3thenprint#4,"mrt."j:goto990<shift>/<spatie>05 

980 print#4,left$(m$(m),3)"."str$(j)<shift>/<spatie>05 

990 print#4,chr$(10):print#4,spc(14)"f£ = fysieke gesteldheid. 23 dagen."<sh 
ift>/<spatie>bf 


)* emotionele gesteldheid. 28 dagen."<shift>/<spatie>85 
1010 print#4,spc(14)"i intellectuele gesteldheid. 33 dagen."<shift>/<spatie>f£3 
1020 print#4,spc(14)"* samenvallen van twee of meer ritmen."<shift>/<spatie>el 
1030 print#4,chr$(10):return<shift>/<spatie>fl 
1040 gosub1280:ifda<=0thengosub1080:return<shift>/<spatie>80 
1050 print#4,d$(z)" "drs" "da;<shift>/<spatie>89 
1060 ifda=lthenprint#4," dag oud.":return<shift>/<spatie>ac 
1070 print#4,"dagen":return<shift>/<spatie>57 


1000 print#4,spc(14)"e 


ou i 


1080 print#4,d$(z)" "dr$;:ifda<Othenprint#4," voor uw geboorte!"<shift>/<spatie 
>ba 
1090 ifda=Othenprint#4," uw geboortedag!"<shift>/<spatie>0f 


1100 return<shift>/<spatie>c6 

1110 cmd4:printspce(9);:ifm=3thenprint"mrt. “";:gotoll30<shift>/<spatie>7£ 

1120 printleft$(m$(m),3)". “";<shift>/<spatie>lc 

1130 printjj$" “pr$:print#4,chr$(10):return<shift>/<spatie>lc 

1140 x=val(right$(m$(m),2)):fori=lto34-x:next:ifs=lthenl190<shift>/<spatie>fb 
1150 4,G(10):4,"lijst van uw kritieke dagen voor deze periode<shift>/<spatie>83 


1160 hs" "34,G(10)hS" dag datum gesteldheid<shift>/<spati 
¢ e>02 
: 1170 4, hs “semaesseesSSSSS SS SSSSSseesesseas====<shift>/<spatie>58 
W 1180 fori=ltos-l:print#4,h$;k$(i):next:print#4,chr$(10)chr$(10)<shift>/<spatie>76 
® | 1190 ifv=Othenl250<shift>/<spatie>5c 
6 1200 4,"overeenkomst tussen "n$" en "n2S" is :<shift>/<spatie>0b 
a 1210 4,G(10)hs$s" fysieke gesteldheid "I(D(v(1)),2)" %<shift>/<spatie>cl 
uw 1220 4,hs" emotionele gesteldheid "I(D(v(2)),2)" %<shift>/<spatie>02 
& 1230 4,hS"intellectuele gesteldheid "I(D(v(3)),2)" %<shift>/<spatie>63 
Q | 1240 print#4,chr$(10)<shift>/<spatie>9b ; 
g 1250 print#4,"vraag voor belangrijke gebeurtenissen (operatie!) een sec-ritme"<sh 
5 ift>/<spatie>22 
6 1260 fori=lto64:print#4,"=";:next:print#4<shift>/<spatie>97 


1270 fori=lto8:print#4,chrs$(10):next:return<shift>/<spatie>54 

1280 w=d:k=int(.6+(1/m) ):1=j-k:o=m+12*k:p=1/100<shift>/<spatie>13 

1290 zl=int(p/4):z22=int(p):23=int((5*1)/4):z24=int(13*(0+1)/5)<shift>/<spatie>06 
1300 z2=244+23-22+z1+d-1:2=(2-(7*int(z/7)))+1:d=w:return<shift>/<spatie>5a 

1310 openl,4:print#l1,chr$(1)chr$(27)chr$(56)chr$(66)<shift>/<spatie>25 

1320 closel:run<shift>/<spatie>0c 

en en Se ae eet ani Se ee eas en 
tie>ba 

ee a ee ee ee ee ea ee 
atie>le 3 

1350 forii=54272t054272+24:pokeii,0:next:return<shift>/<spatie>c5 

1360 G(147)G(17)13)"bioritme<shift>/<spatie>5l 

1365 rss="":forxx=ltol4:rsS=rs$+chr$(192):next<shift>/<spatie>38 









1370 print,rs$chr$(32)chr$(17)chr$(17)chr$(17):gosubl1610<shift>/<spatie>79 

1380 eerie printchr$(17)chr$(31)"naam";:inputn$:gosubl1330<shift>/<spatie>1l 
1390 G(28)G(1 ae gba de ee te 

1400 printchr$(31)chr$(17)"geboortedag";:inputt:gosub1330<shift>/<spatie>c7 

1405 printchr$(17)"geboortenaana" inputm:gosub1330<shift>/<spatie>la 

1410 printchr$(17)"geboortejaar"; :inputj:gosub1330<shift>/<spatie>bd 

1420 printchr$(28)chr$(17)chr$(17)chr$(17)"gewenst bioritme : "chr$(17)<shift>/<s 
patie>9c 

1430 pokel98,0:printchr$(31)chr$(17)"maand";:inputmm:gosub1330<shift>/<spatie>fa 
1431 printchr$(17)"jaar";:inputjj:gosub1330:mo=mm: ja=jj:ta=tt<shift>/<spatie>75 
1440 m=m+1:mm=mm+l<shift>/<spatie>9f 

1450 s=int(33*365.25)-int(j*365.25)+int(mm*30.6)-int(m*30.6)-t<shift>/<spatie>lec 
1460 forn=23to33step5:s(n-23)=int((s/n-int(s/n))*n) :next<shift>/<spatie>3b 

1470 printchr$(147)tab(3)"bioritme van :"chr$(28)nS<shift>/<spatie>a9 

1480 printchr$(31)" voor de maand:";mo;chr$(157)".";ja:print" geb.datum:"t; 
m-1;j<shift>/<spatie>76 

1490 printchr$(142):fort=0tol6:pokel304+40*t,93:poke55576+40*t,6:next<shift>/<spa 
tie>c7 

1500 fort=0t039:pokel624+t,114:poke55896+t,6:next:pokel624,9l<shift>/<spatie>24 
1510 fort=0to39:ifint(t/5)<>t/5thenl530<shift>/<spatie>bd 

1520 pokel664+t,66:poke55936+t,6<shift>/<spatie>c0 

1530 next:pokel624,91:fort=0to039<shift>/<spatie>36 

1540 p=t-40*int(.5+8*sin((s(0)+t)*2*3.1416/23) ):pokel624+p,81:poke55896+p, 2<shift 


>/<spatie>89 

1550 e=t-40*int(.5+8*sin((s(5)+t)*2*3.1416/28) ):pokel624+e,42:poke55896+e,6<shift 
>/<spatie>93 

1560 i=t-40*int(.5+8*sin((s(10)+t)*2*3.1416/33) ):pokel624+i,87:poke55896+i,5<shif 
t>/<spatie>bd 

1565 next<shift>/<spatie>99 

1570 G(28)" input = lichamelijke toestand<shift>/<spatie>8b 

1580 G(31)" * = emotionele toestand<shift>/<spatie>67 

°1590 printchrs(30)" W = geestelijke toestand"chr$(31) :gosubl1330<shift>/<spati 
e>82 


1600 sys49152:run<shift>/<spatie>53 

1610 readhhsS:ifhhs$<>"chb"thenl610<shift>/<spatie>90 

1620 data"chb"<shift>/<spatie>98 

1630 fori=0to97:reada:poke49152+i,a:next:return<shift>/<spatie>50 

1640 datal69,4,133,186,169,126,133,184,169,0,172,136,2,133,113,132,114,133<shift> 
/<spatie>c9 

1650 datal83,133,185,32,192,255,166, 184, 32,201,255,174,8,229,169,13,32,210<shift> 
/<spatie>d4 


1660 data255,32,225,255,240,47,160,0,177,113,133,103,41,63,6,103,36,103<shift>/<s 
patie>el 

1670 datal6,2,9,128,112,2,9,64,32,210,255,200,204,6,229,208,229,152,24,101<shift> 
/<spatie>2b 

1680 datal13,133,113,144,2,230,114,202,208,204,169,13,32,210,255,32,204<shift>/<s 
patie>15 

1690 data255,162,126,76,195,255,96<shift>/<spatie>2c 

1700 sys65126<shift>/<spatie>0a 


NETSPANNING-6G4 
Het bijgaande programma 

hoort bij de column van Wijo 

Koek en René Boot op pagina 

79. 


NETSPANNING 64 


0 rem netspanning 64 (1985)<shift>/<spatie>d4 

5 rs$="";forxx=lto7:rs$=rs$+chr$(29):next<shift>/<spatie>6ée 

6 doS="":forxx=1to08:do$=do$+chr$(17):next<shift>/<spatie>65 

10 fort=0to319:readtt:pokel2288+t,tt:nextt<shift>/<spatie>dd 

20 Senedak poke53280,11:poke53281,11l:sprite=53248<shift>/<spatie>cl 

30 printchr$(5)chr$(17)chr$(17)chr$(17)chr$(29)chr$(29)chr$(29)"kies;: "<shift>/<sp 
atie>57 

40 printchr$(17)chr$(17)rs$"1l- kro":printchr$(17)rs$"2- tros"<shift>/<spatie>bd 
45 printchr$(17)rs$"3- vara"<shift>/<spatie>6b 

50 getaS:a=val(aSs): ifa<lora>3then50<shift>/<spatie>3d 

55 printchr$(147) :poke53265,peek(53265)and239<shift>/<spatie>8f 
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COMMODORE DOSSIER AKTIEF PROGRAMMAS 


60 onagoto70,80,90:rem sprite-initialisatie<shift>/<spatie>af 

70 aantal=1:poke2040,192:pokesprite+39,7:pokesp,252:pokesp+1l,72:scherm=6<shift>/< 
spatie>67 

75 pokespritet+21,1:gosub410:printchr$(5):gotol00<shift>/<spatie>31l 

80 aantal=1:poke2040,193:pokespritet+39,7:pokesp,242:pokesp+1,65:scherm=14<shift>/ 
<spatie>44 

85 pokespritet+21,1:pokesprite+23,1:pokesprite+29,l<shift>/<spatie>75 

87 printchr$(19)tab(28)do$chr$(5)"tros"chr$(31):gotol00<shift>/<spatie>00 

90 aantal=3:poke2040,196:poke2041,194:poke2042,195<shift>/<spatie>77 

93 pokesprite+39,2:pokesp+40,1:pokesp+41,1l<shift>/<spatie>7c 

96 pokesp+29,7<shift>/<spatie>4e 

98 pokesprite,226:pokespt+l1,0:pokesp+2,195:pokesp+3,100:pokesp+4,252:pokesp+5,100< 
shift>/<spatie>c7 

99 scherm=0:pokesprite+21,7:printchrs$(5)<shift>/<spatie>a5 

100 poke53280,scherm: poke53281,scherm<shift>/<spatie>5f 

110 waitl97,64:waitl97,60<shift>/<spatie>50 

120 poke53265,peek(53265)orl6<shift>/<spatie>b7 

130 ifa=3thengosub500<shift>/<spatie>d6 

140 printchr$(19)doS"mededetliong "<shift>/<spatie>f0 

142 printchrs$(17)chr$(17)chr$(17)chr$(17)"als gevolg van een wilde"<shift>/<spati 
e>ld 

143 printchrs 


( "staking bij de afdeling"<shift>/<spatie>fl 
144 printchrs ( 

( 

( 


) 
)"telecommunicatie van de "<shift>/<spatie>ad 
145 printchrs )"n.o.s. komen de"<shift>/<spatie>f7 

146 printchrs$ )"programma’s' op dit net"<shift>/<spatie>de 

148 printchr$(17)"vanavond te vervallen."<shift>/<spatie>a4 

150 waitl97,64:waitl97,60<shift>/<spatie>a8 

160 poke53265,peek(53265)and239:poke53280,0:poke53281,0<shift>/<spatie>de 

170 waitl97,64:waitl97,60<shift>/<spatie>94 

180 pokesprite+21,0:pokesprite+29,0:pokesprite+23,0:printchr$(147)<shift>/<spatie 
7C2 E 

190 poke53265,peek(53265)orl6:goto20<shift>/<spatie>c0 

400 rem* kro-kooi *<shift>/<spatie>67 

410 printchrs$(19)tab(28):printchr$(158)chr$(175)chr$(175)chr$(175)chr$(175)<shift 


~sara~wn~ 


1 
1 
1 
1 


>/<spatie>15 

415 rs$=""3forxx=lto4:rs$=rs$+chr$(214) :next<shift>/<spatie>ca 

420 printtab(27)chr$(18)chr$(169)chr$(146)rsSchr$(18)chr$(127)chr$(146)<shift>/<s 
patie>9c 


422 rl$=chr$(112)+chr$(214)+chr$(180)<shift>/<spatie>a8 
425 r2S=chr$(170)+chrs$(214)+chr$(207):r3S=chr$(170)+chrs(214)+chr$(180)<shift>/<s 


patie>gf 
430 printtab(26)r2$chr$(183)chr$(183)r1l$<shift>/<spatie>bb 
440 r4$=r3S4+" "+r3S<shift>/<spatie>49 


445 printtab(26)r4S<shift>/<spatie>e9 


450 printtab(26)r4S<shift>/<spatie>96 

460 printtab(26)r4S<shift>/<spatie>98 

470 printtab(27)chr$(127)+rs$+chr$(169)<shift>/<spatie>ee 
480 printtab(28)chr$(183)chr$(183)chr$(183)chr$(183):return<shift>/<spatie>4c 
500 rem* vara-uitroepteken *<shift>/<spatie>42 

510 fort=10tol00<shift>/<spatie>0c 

520 pokesprite+l1,t<shift>/<spatie>77 

530 fortt=1to20:next<shift>/<spatie>0c 

540 next:return<shift>/<spatie>28 

1000 rem * kro-logo *<shift>/<spatie>14 

1001 data000,231,000,000,238,000,000,252<shift>/<spatie>49 
1002 data000,000,248,000,000,252,000,000<shift>/<spatie>4d 
1003 data238,000,000,231,000,113,017,252<shift>/<spatie>4e 
1004 datall15,024,206,119,024,206,127,017<shift>/<spatie>4e 
1005 data206,119,003,206,115,017,206,113<shift>/<spatie>4f 
1006 data024,252,000,126,000,000,231,000<shift>/<spatie>44 
1007 data000,231,000,000,231,000,000,231<shift>/<spatie>43 
1008 data000,000,231,000,000,126,000,000<shift>/<spatie>59 
1009 rem * tros-logo *<shift>/<spatie>41l 

1010 data000,016,000,000,056,000,024,056<shift>/<spatie>5f 
1011 data048,031,125,240,015,239,224,012<shift>/<spatie>5a 








1012 datal98,096,013,255,096,007,255,192<shift>/<spatie>57 
1013 data015,131,224,059,001,184,243,001<shift>/<spatie>5e 
1014 datal58,059,001,184,015,131,224,007<shift>/<spatie>52 
1015 data255,192,013,255,096,012,198,096<shift>/<spatie>50 
1016 data015,239,224,031,125,240,024,056<shift>/<spatie>5b 
1017 data048,000,056,000,000,016,000,000<shift>/<spatie>5d 
1019 rem * vara-logo (1) *<shift>/<spatie>65 

1020 datal92,012,192,192,012,192,192,012<shift>/<spatie>59 
1021 datal92,096,025,224,096,025,224,096<shift>/<spatie>54 
1022 data025,224,048,051,048,048,051,048<shift>/<spatie>5l 
1023 data048,051,048,024,102,024,024,102<shift>/<spatie>5l 
1024 data024,024,102,024,012,207,252,012<shift>/<spatie>ae 
1025 data207,252,012,207,252,007,152,006<shift>/<spatie>ae 
1026 data007,152,006,007,152,006,003,048<shift>/<spatie>a6é 
1027 data003,003,048,003,003,048,003,000<shift>/<spatie>ab 
1029 rem * vara-logo (2) *<shift>/<spatie>9f 

1030 data252,000,192,254,000,192,255,000<shift>/<spatie>a9 
1031 datal92,007,129,224,003,129,224,00l<shift>/<spatie>a3 
1032 datal29,224,001,131,048,001,131,048<shift>/<spatie>ad 
1033 data001,131,048,003,134,024,007,006<shift>/<spatie>ae 
1034 data024,254,006,024,252,015,252,112<shift>/<spatie>a2 
1035 data015,252,056,015,252,028,024,006<shift>/<spatie>a9 
1036 data014,024,006,007,024,006,003,176<shift>/<spatie>a6 
1037 data003,001,176,003,000,176,003,000<shift>/<spatie>a4 
1039 rem * vara-logo (3) *<shift>/<spatie>94 

1040 data000,024,000,000,024,000,000,024<shift>/<spatie>bd 
1041 data000,000,024,000,000,024,000,000<shift>/<spatie>ba 
1042 data024,000,000,024,000,000,024,000<shift>/<spatie>bf 
1043 data000,024,000,000,024,000,000,024<shift>/<spatie>be 
1044 data000,000,024,000,000,024,000,000<shift>/<spatie>bf 
1045 data024,000,000,000,000,000,000,000<shift>/<spatie>b8 
°1046 data000,024,000,000,060,000,000,060<shift>/<spatie>bb 
1047 data000,000,060,000,000,024,000,000<shift>/<spatie>be 


SPRITE EDITOR 

Een fraai programma dat u modore u op ruitjespapier wil | komt. Er zijn al veel sprite- *Spel-ontwerpen’ verwijst Jan 
helpt bij het maken van spri- laten doen. Ook neemt de edi- editors verschenen voor de Jacobs er steeds weer naar. 
tes. In feite kunt u met dit pro- tor het rekenwerk van u over Commodore, maar wij zullen in Het is dus wel zinvol dat u de 
gramma op het scherm doen, _ dat bij het met de hand ont- de toekomst steeds naar deze _ze editor overneemt. 

wat het handboek van Com- werpen van sprites te pas verwijzen. Voor de cursus 


SPRITE EDITOR 


5 poke55,194:poke56,49:clr<shift>/<spatie>ab 

6 riS="";forxx=ltoll:riS$=ri$tchr$(29):next<shift>/<spatie>40 

10 dimp$(21):poke649,1: e 53248: ee ee ren ee eee 
15 printchrs(147)chr$(18)chr$ ( Msc Sibya tt 
t>/<spatie>52 

16 printchr$(5);<shift>/<spatie>4l 

20 pokev+21,0:printchr$(18)chrs$(156)" sprite editor Moe 
hift>/<spatie>cb 

25 printchrs (18) ahrs (3:1)" “ehrs'(-30)'s<shite 
>/<spatie>75 

30 printchr$(146)chr$(17)chr$(17)"laatst gebruikte blok ="sbeehrs (13) 3<shitts/<sp 
atie>93 

31 print"laatste laad/save blok = ";bl<shift>/<spatie>85 

35 printchr$(17)chr$(18)chr$(31)"1."chr$(30)chr$(146)"start editor";chr$(13);<shi 
ft>/<spatie>fb 

36 printchr$(18)chr$(31)"2."chr$(30)chr$(146)"bekijk een sprite-blok";chr$(13);<s 
hift>/<spatie>3a 

37 printchr$(18)chr$(31)"3."chr$(30)chr$(146)"bekijk data van een sprite-blok"<sh 
ift>/<spatie>b7 

42 printchr$(18)chr$(31)"4."chr$(30)chr$(146)"sprite omkeren";chr$(13);<shift>/<s 
patie>2a 

43 printchr$(18)chr$(31)"5."chr$(30)chr$(146)"sprite bewegen";chr$(13); <shift>/<s 
patie>26 

45 printchr$(18)chr$(31)"6."chr$(30)chr$(146)"laad sprite-data";chr$(13);<shift>/ 
<spatie>4f 
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48 printchrs(18)chr$(31)"7."chr$(30)chr$(146)"save sprite-data";chr$(13);<shift>/ 
<spatie>5a 

49 printchr$(18)chr$(31)"8."chr$(30)chr$(146)"s t o p p e n"<shift>/<spatie>c6 

50 print:print:printchr$(156)"druk op de gewenste toets":goto227<shift>/<spatie>88 
95 printchr$(147)<shift>/<spatie>32 

100 printchr$(30)"welk blok (201-254)?":gosub 270:gosub 300<shift>/<spatie>32 

115 b=bl:x=24:y=74:pokev+21,61:char=160:fg=0:pokev,x:pokev+l,y<shift>/<spatie>74 
118 gosub 200<shift>/<spatie>c9 

120 ifx>2llorx<24 then x=peek(v)<shift>/<spatie>ad 

125 ify>234ory<74 then y=peek(v+l1)<shift>/<spatie>30 

128 pokev,x:pokev+l,y<shift>/<spatie>20 

130 if fg=l thengosubl60<shift>/<spatie>96 

133 if fg=2 thengoto352<shift>/<spatie>95 

135 if fg=3 thengotol5<shift>/<spatie>a6 

155 gotoll8<shift>/<spatie>2a 

160 xx%=(x-12)/8:yy%=(y-46) /8:s=1024+xx%+40*yy%:pokes,char:pokest+54272,2:fg=0<shi 
ft>/<spatie>el 

165 return<shift>/<spatie>2b 

200 getk$:ifk$=""then200<shift>/<spatie>ff 

205 ifk$=chr$(157)thenx=x-8:return<shift>/<spatie>5c 

208 ifk$S=chr$(29)thenx=x+8:return<shift>/<spatie>78 

210 ifk$=chr$(145)theny=y-8:return<shift>/<spatie>40 

215 ifk$=chr$(17)theny=y+8:return<shift>/<spatie>72 

218 ifks="a"thenchar=160:fg=l:return<shift>/<spatie>fb 

220 ifk$S=" "thenchar=32:fg=l:return<shift>/<spatie>aa 

222 ifkS=chr$(13)thenfg=3:return<shift>/<spatie>df 

224 ifk$=chr$(133)thenprintchr$(19)chr$(31)chr$(18)"sprite wordt gemaakt":fg=2<sh 
ift>/<spatie>02 

226 return<shift>/<spatie>6c 

227 getkS:ifkS=""then227<shift>/<spatie>dl 


228 ifkS="l1"then95<shift>/<spatie>28 

235 ifks="2"then600<shift>/<spatie>le 

237 ifk$="3"then502<shift>/<spatie>18 

238 ifkS="4"then705<shift>/<spatie>19 

239 ifksS="5"then875<shift>/<spatie>1ll 

240 ifkS="6"then820<shift>/<spatie>0d 

249 ifkS="7"then858<shift>/<spatie>0a 

250 ifks="8"thenend<shift>/<spatie>b3 

253 goto227<shift>/<spatie>43 

270 printchr$(156)chr$(18)"blok"chr$(146);:inputbl$:bl$=left$(b1$,3):bl=val(bl1$)< 
shift>/<spatie>ca 

272 ifbl>2550rb1<200thenprint"out of range": goto270<shift>/<spatie>88 

275 return<shift>/<spatie>9c 

280 printchr$(30)"klaar, raak een toets voor het menu":pokel98,0:waitl98,1<shift> 
/<spatie>78 

290 return<shift>/<spatie>ad 

300 printchr$(147)chr$(17)chr$(30):forl=0tol8:printtab(28)chrs(18)" "<s 
hift>/<spatie>5l 

301 nextl:printchr$(19)chr$(17)chr$(17)chr$(31);<shift>/<spatie>70 

318 printchr$(18)" ":forl=0to20<shift>/<spatie>ba 

320 printchr$(18)" "chr$(146) "“ehz$ (.18)" “chrS'( 146) pris<s 
hift>/<spatie>dc 

325 nextl<shift>/<spatie>8a 

330 printchrs(18)" ";<shift>/<spatie>26 

335 printchr$(19);chr$(18)chr$ ( )"teken";" blok” *b1)*ahitt> 
/<spatie>47 

336 printchr$(157) "<shift>/<spatie>3d 

338 iffg= Smawotedtstsiel Pub Mcoak tepd § 

340 return<shift>/<spatie>db 

345 printchr$(19)chr$(17)chr$(17)chr$(17)chr$(28):forl=0tol8:printchrs$(29);ps(1)< 
shift>/<spatie>b7 

346 nextl:fg=0:gotol1l5<shift>/<spatie>aa 

352 m=b1*64:r=0:forl=0to20:p$(1)=""snextl:forl=0t062:pokem+1,0:nextl<shift>/<spat 
ie>79 

353 forry=0to20:yy=1145+40*ry:rx=0<shift>/<spatie>fe 

365 forc=0to2<shift>/<spatie>ba 

368 forn=7to0step-1:p=peek(yytrx)<shift>/<spatie>27 

370 ifp=160thenpokem, (peek(m)+2)and255:p$(r)=p$(r)+chr$(18)+" "+chr$(146)<shift 
>/<spatie>2e 

400 ifp=32thenp$(r)=p$(r)+" "<shift>/<spatie>66 

402 rx=rx+l:nextn:m=m+l:nextc:r=r+l:nextry<shift>/<spatie>04 

405 forc=0to3: oer e caas bl:nextc<shift>/<spatie>da 

450 printchr$(19)chr$(17);:gosub280:gotol5<shift>/<spatie>55 

502 printchrs ( 1a pobes | 30)"data voor welk ee ee 

505 gosub270:m=b1*64:printchr$(17)chr$(17);:forl=mtom+62:printchrs$(30)chr$(29); 
hift>/<spatie>62 
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506 printpeek(1);",";<shift>/<spatie>cl 

508 nextl:printchr$(20);chr$(13):gosub280:gotol5<shift>/<spatie>91 

600 printchrs$(147)chr$(30)"welk sprite-blok?":gosub270:m=b1*64:p=peek(m)<shift>/< 
spatie>6é7 

601 pokev+21,61:b=bl<shift>/<spatie>dce 

602 forl=2042t02045:pokel,bl:nextl:gosub300: forry=0to020: yy=1145+40*ry:rx=0<shift> 
/<spatie>91 

605 forc=0to2:forn=7to0step-l<shift>/<spatie>5e 

618 ifp>=2thenp=p-2:poke54272+yytrx,2:pokeyy+rx,160:<shift>/<spatie>ad 

625 rx=rxt+l:nextn:m=m+1:p=peek(m) :nextc:nextry<shift>/<spatie>al 

630 gotol5<shift>/<spatie>f9 

705 printchr$(147);chr$(30)"welk blok omkeren?":gosub270:m=bl*64:b=bl<shift>/<spa 
tie>06 

710 forl=mtom+63:pokel,255-peek(1):nextl<shift>/<spatie>9f 

720 gosub280: i ee ee 

820 printchr$(147)chr$(30)"in welk blok data laden?":gosub270:m=b1*64:bl=bl<shift 
>/<spatie>f8 

821 print"van "chr$(18)"c"chr$(146)"assette of "chr$(18)"d"chr$(146)"iskette:"<sh 
ift>/<spatie>f2 

822 getawS:ifawS=""then822<shift>/<spatie>08 

823 ifawS="d"then 830<shift>/<spatie>e7 

824 ifawS="c"then 825:goto822<shift>/<spatie>60 

825 openl,1,0,"":forl=0to62:input#1,x:pokem,x:m=mt+l:nextl:closel:gosub280<shift>/ 
<spatie>c2 

826 gotol5<shift>/<spatie>b4 

830 input"welke file-naam";aw$<shift>/<spatie>e9 

832 open2,8,2,"s0:"tawS+",s,r"<shift>/<spatie>a2 

834 forl= 0to62: input#2,x:pokem,x:m=m+l:nextl:close2:gosub280<shift>/<spatie>00 
835 gotol5<shift>/<spatie>cd 

858 printchr$(147);chr$(18)chr$(30)"welk blok saven?":gosub270:m=b1*64:bl=bl<shif 
t>/<spatie>78 

860 print"op "chr$(18)"c"chr$(146)"assette of "chr$(18)"d"chr$(146)"iskette:"<shi 
ft>/<spatie>dd 

861 getaw$S:ifawS=""then86l1<shift>/<spatie>64 

862 ifaw$S="d"then 866<shift>/<spatie>8d 

863 ifawS="c"then 864:goto86l<shift>/<spatie>05 


864 openl,1,1,"sprite data": forl=mtom+63:x=peek(1):print#l,x:nextl<shift>/<spatie, 


>da 

865 closel:gosub280:gotol5<shift>/<spatie>c9 

866 input"welke file-naam:";awS$<shift>/<spatie>8f 

867 open2,8,2,"s0:"+tawSt+",s,w"<shift>/<spatie>84 

868 forl=mtomt+63:x=peek(1):print#2,x:nextl<shift>/<spatie>5Sc 

869 Bloepet gosub280:gotol5<shift>/<spatie>ce 

870 :<shift>/<spatie>5f 

875 chee O:printchr$(147)chrs$(30)"type het bloknr dat u wilt bewenen cent PEs 7 
<spatie>82 

876 print" ’e” stopt de beweging":print" “spatie” vertraagt de beweging"<shift>/<sp 
atie>l2 


877 gosub270:an(0)=bl<shift>/<spatie>6e 
880 printchr$(18)chr$(30)"vergroten x,y,n(iet),b(eide)"chr$(146);:inputop$<shift> 
/<spatie>ba 


881 opS=left$(op$,1):ifop$="x"thenpokev+29,1<shift>/<spatie>ae 

882 ifopsS="y"thenpokevt+23,l<shift>/<spatie>fa 

883 ifop$="b"thenpokevt+23,1:pokev+29,1l<shift>/<spatie>a7 

884 x=24:pokevt+1,140:r=0:pokevt+21,1l<shift>/<spatie>47 

885 poke2040,an(r):r=r+l:ifr>pthenr=0<shift>/<spatie>fl 

886 ifx>320thenpokev+16,0:x=24<shift>/<spatie>27 

888 pokev+l6,int(x/256):pokev,xand255:x=x+2<shift>/<spatie>49 

890 getk$S:ifk$="e"then900<shift>/<spatie>00 

892 ifkS=""thengosub895<shift>/<spatie>l7 

893 fort=0to30:nextt:goto885<shift>/<spatie>e4 

895 fort=0to700:next:return<shift>/<spatie>b4 

900 pokev+23,20:pokev+29,24:gosub280:poke2040,11: siimcsg iS 60:x=24:pokev,x<shift>/ 
<spatie>yc 

905 gotol5<shift>/<spatie>07 

1500 pokev+16,60:pokev+39,4:forl=41t044:pokev+1,6:nextl:pokev+23,20:pokev+29, 24<s 
hift>/<spatie>c5 

LS,Ls, pokev+4,10:pokev+5,70:pokev+6,10:pokev+7,115:pokev+8,10:pokev+9,140<shift>/< 
1518 pokev+10,10:pokev+11,188:poke2040,11:forl=704t0704+63:read d:pokel,d:nextl<s 
hift>/<spatie>ad 

1530 restore:return<shift>/<spatie>c7 

1535 data0,255,0,0,255,0,0,255,0,0,255,0,0,255,0,0,255,0,0,255,0,0,255,0<shift>/< 
spatie>55 

1540 Dataprrrrrrrrrrrr errr e rece ee Pee EPPO e reese eSSALELD/< 
spatie>ad 
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Maandelijkse rubriek met de belangrijkste informatie uit de 
Commodore gebruikersclubs. 


Stichting Computer Hobbyisten 
Nederland (SCN) 
HOT NEWS 


Secretariaat: A. Brink, tel. 
03450-16051 (ma-, di- en 
woensdag tussen 13.00 en 
22.00 uur) 

Voor inlichtingen over de re- 
gionale afdelingen kun u zich 
wenden tot: 

Afdeling Zwolle: P.P.L. van 
Bijsterveld, tel. 038-548459. 
Afdeling Midden Nederland: H. 
Scheffer, tel. 03453-1375 
Afdeling Deventer:tel. 
05700-50758/50759 
Algemene bijeenkomsten: 
tweede zaterdag van de 
maand in de scholengemeen- 
schap Centrum/oud-west, Jan 
van Galenstraat t/o nr. 14, 
Amsterdam. Vanaf april wor- 
den de bijeenkomsten gehou- 
den in De Meervaart, Osdorp- 
plein, Amsterdam. 


Vereniging voor de Gebruikers van 
Commodore-computers in Nederland 
(VCGN) 


Secretariaat: Ine van Teijlin- 
gen, De Brink 928, 2553 HT 
Den Haag, tel.: 070-971851 
(van 20.00 -22.00 uur, m.u.v. 
maandag en woensdag) 
b.g.g. 070-687924 of 
070-946156 


Voor inlichtingen over de re- 
gionale afdelingen kunt u zich 
wenden tot: 

Afdeling Zeeland: R. van Dijk, 
tel. 01180-25746 

Afdeling West-Brabant: P. Ne- 
len, tel. 01640-51639 

Afdeling Midden-Brabant: W. 
Wils, tel. 01620-55634 
Afdeling Oost-Brabant: C. de 
Winter, tel. 04120-42054 
Afdeling Zuid-Limburg: J. van 
Mastrigt, tel. 043-476935 
Afdeling Zuid Holland-Zuid: D. 


COMMODORE MARKT 


Abonnees van Commodore Dossier Aktief kunnen in deze ru- 
briek kosteloos een advertentie plaatsen. De service is uit- 
Sluitend bedoeld voor particulieren. Puur commerciéle adver- 
tenties en aanbiedingen van illegale programmatuur worden 
geweigerd. De redactie is niet verantwoordelijk voor fouten 
als gevolg van onduidelijke opgave. 

Een advertentie mag ten hoogste 7 regels van 25 aanslagen 


lang zijn. 
IK BIED HARDWARE AAN 


* Vice-20 + rec. + 2 joyst. + softw. + 
Ned. handb. Pr. f 400,-. Tel. 
010-835101. 


* Vic-20 met uitbr. tot 20K Ram + 
comm. cass.rec. + joyst. (beste uit 
cons.test) z.g.a.n. t.e.a.b. J. Drijver, tel. 
078-170523. 


* CBM 64 + cass.rec. + joystick + 55 
spelletjes, Simon’s Basic + reset-knop. 
Prijs f 625,-. Na 6u 02263-3906. Vragen 
naar Jan-Willem. 


* © 64, datarec., 1541 (3wk!), Zenith 
monitor (1,5wk!), 20 diskettes tot 

f 1900! Veel softw. met handi. + div. 
boeken. Prijs laag! Wegens syst. 

wiss. en veel korting op nwe syst. R. 

Montsma, Pieter 3, 3641 NA Mijdrecht, 
02979-3329. 


* Voor zendamateurs RTTY/Morse deco- 
der v. Commodore 20 of 64. U dient 
slechts een kortegolf zender/ontvanger te 
hebben. Inl.: B.G. Remmers, Postbus 116, 
6500 AC Nijmegen, 080-239490. 


* Commodore Vic 20 + cass.rec. + 40 
spell. + joyst. + 2 Ned. instr.boeken 
(ook Engelse). Prijs f 300,-. Tel. 
040-416984. 


* Comm. €2001 incl. cass.rec. en enkele 
progr. en lectuur. Vr.pr. f 2200,-. Tel. na 
19u 050-719477. 


IK BIED HARDWARE EN 
SOFTWARE AAN 


* MPS-801 printer (CBM) + 40 C-64 
topprogramma’s + 3 mnd. garantie, 
f 700,-. Tel. 01820-35147. 


IK BIED SOFTWARE AAN 


* Veel progr. voor Vic-20, ook games 
(Frogger, Pacman, Skramble). Voor info, 
bel 073-563562 of schrijf: Jorg 
Roodbeen, Brabantlaan 43, 5262 GX 
Vught (postz. bijsluiten). 


* Forth cart. voor CBM-64 (Audiogenic) 
samen met boek Flitsend Forth en 
uitgebr. handl., f 100,-. Tel. 
020-173432. 


van Riemsdijk, tel. 010-501023 
Afdeling Noord Holland-Zuid: 
J.A. Dekker, tel. 02502-7968 
Algemene bijeenkomsten: 
laatste zaterdag van de maand 
in Rijswijk (Lodewijk Makeblij- 
de College, H.R. Holstlaan 2, 
2283 HB). 
Afdelingsbijeenkomsten: 
Afdeling Zeeland: bij wijze van 
proef: maandag 11/2 ’savonds, 
zaterdag 9/3 overdag. De data 
van de overige bijeenkomsten 
zijn nog niet bekend. 

Afdeling West-Brabant: eerste 
zaterdag van de maand 
Afdeling Midden-Brabant: derde 
zaterdag van de maand. (in ver- 
band met carnaval zal in februari 
de bijeenkomst op de tweede za- 
terdag worden gehouden). 
Afdeling Oost-Brabant: derde 
zaterdag van de maand. (in ver- 
band met carnaval zal in febru- 
ari de bijeenkomst op de twee- 
de zaterdag worden gehouden). 
Afdeling Zuid-Limburg: eerste 
zaterdag van de maand 
Afdeling Zuid Holland-Zuid: 
eerste zaterdag van de maand 
Afdeling Noord Holland-Zuid: 
eerste zaterdag van de maand 


* NOS Basicode-2 pakket, bestaande uit 
boek + cass. Stort f 20,- op giro 
4371562 t.n.v. J. de Jager, Schoolstr. 
11, 7071 ZX Ulft. 


IK ZOEK HARDWARE 


* Commodore 64 diskdrive, max. 1 jr. 
oud. Tel. 02230-31382. 


* CBM 1541 diskdrive, aanbiedingen + 
prijsopg. sturen naar M. v. Kersen, 
Waardsedijk 4, 3448 HV Woerden, tel. 
03480-15680. 


* Commodore 64 met datarec. E. 
Schieving, Crocuslaan 12, 5582 GB 
Waalre, tel. na 19u s.v.p. 04904-2194. 


* CBM-64 met datarec. en event. softw. 
Tel. 010-193881. 


* Expansion interf. v. TRS-80 met 32K 
Ram en RS-232 interf. Tevens hi-res 
modific. + benodigde softw. L.E. 
Eikenoord, tel. na 19.30u: 01862-1772. 


* Commodore 64 aanbieding met prijsopg. 
aan R. Pieterse, Dr. A. Kuyperstraat 8, 
2841 CJ Moordrecht, tel. 01827-3037. 


* Commodore 8032 + disk drive model 
8050 of wat daar compatibel mee is. C. 
van Benthum, Burg. van Hultenstraat 7, 
5443 AP Haps, tel. (tijdens kantooruren) 
040-762888. 


* Voor CBM-64: disk drive 1541 en 
grafische printer (bijv. DCS-64 of 
MPS-801 of MPS 803). Schrijf naar: D. 
Cras, Van Ostadelaan 4, 3723 BZ 
Bilthoven. 


PET-Benelux Exchange 
Secretariaat: Copytronics, 
Postbus 700, 7400 AS Deven- 
ter, tel. 05759-2211 

Voor inlichtingen over de regi- 
onale afdelingen kunt u zich 
wenden tot: 

Afdeling Zeist: tel. 05759-211 
Afdeling Nijmegen: tel. 
05759-2211 

Afdeling Haaksbergen: tel. 
053-7664444 

Service Reparatie Centrum voor 
PET-leden: tel. 053-766444., 
Algemene bijeenkomsten: 
Afdeling Zeist: eerste zaterdag 
van de maand 

Afdeling Nijmegen: tweede za- 
terdag van de maand 

Afdeling Haaksbergen: derde 
zaterdag van de maand 


HCC-Commodore-COMPET gebrui- 
kersgroep 

Secretariaat: J.J. van Douwen, 
Couwenhoven 1203, 3703 VB 
Zeist, tel. 08404-59599 
Bijeenkomsten: 

Utrecht: zaterdag 19/1, 23/3, 
8/6, 21/9 en 30/11 
Waddinxveen: zaterdag 23/2, 
27/4, 6/7, 26/10 en 21/12. 


IK ZOEK HARDWARE EN SOFTWARE 


* Vic-20 hard/software. Omschr. en 
prijsopg. naar: |. Witte, Peerlkamplaan 3, 
1217 AT Hilversum. 


IK ZOEK SOFTWARE 


* Wie heeft v. mijn Commodore 64 een 
progr. voor het bijhouden van bowling 
scores? Tegen verg. H. van Balen, Jan 
van Houtstraat 112, 2581 TA Den Haag. 
Tel. 070-501235. 


* Beginner zoekt softw. v. CBM 64. 
Schrijf of bel naar W. van Eck, Ged. 
Binnengracht 58, 3441 AH Woerden, tel. 
na 6u 03480-19201. 


* Wie kan mij helpen aan een goede 
database, bijv. Superbase 64, evt. tegen 
bet.? Tevens div. serieuze softw., evt. 
ruilen. Eriq Terra, Van Riellaan 29, 3571 
WB Utrecht. 


* CBM-64: Viditel-progr. met 
Telesoftware. Tel. 04163-72815. 


* Ik ben op zoek naar redel. profess. 
softw. voor de Commodore 64. Ben 
bereid een redel. verg. te geven. Tel. na 
18u 02284-1611. 


* Wie heeft C-16 softw., alleen op 
cassette (geen spel), en Ned. 
gebruiksaanw.? Aanb. + prijsopg. naar C. 
Nijpels, Atoomstraat 13, 6227 Cm 
Maastricht. 


* Wie heeft voor mij progr. voor de 
C-647 Graag uitgeprint. P. Nijsen, 
Neptunusstraat 13, 1223 HJ Hilversum. 
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De drie meest peers geet oh voor computers zijn databases, spreadsheets 


ers. In het eerste 


ommodore Dossier hebben we een database en 


een spreadsheet cadeau iat en daarom kunnen we een tekstverwerker moeilijk 


> DE TOETSEN 


In deze tekstverwerker hebben een aantal 
toetsen een aparte functie. 

RETURN wordt gebruikt om naar een nieu- 
we regel te gaan. 

DEL wist de laatst ingevoerde letter uit. 
SHIFT levert hoofdletters op. 

@ met deze toets kunnen we midden in 
een tekst terugkeren naar het menu. 

F1 — F8 met de functietoetsen kunnen we 
voorgeprogrammeerde standaardzinnen of 
tabulator-stops in de tekst invoegen. 


HET GEBRUIK 

Deze tekstverwerker is menu-gestuurd. 
Dat wil zeggen dat u bij de start van het 
programma een lijst met keuzemogelijkhe- 
den krijgt. Na het maken of bewerken van 
een tekst keert u altijd terug naar het 
hoofdmenu. 

Het menu ziet er als volgt uit: 


m maken van nieuwe tekst 
a toevoegen van tekst 

t regels tussenvoegen 

k tekst verwijderen 

s bewaren van tekst 

| ophalen van tekst 

Vv verbeteren van tekst 

ft vervangen van tekst 

z laten zien van tekst 

p printen van tekst 

0 opvragen vrije geheugen 
e maken van standaard-zinnen 
q tekst naar printer 


We bespreken nu achtereenvolgens de 
verschillende onderdelen. 


m Maken van tekst 

Steeds wanneer u de tekstverwerker voor 
het eerst gebruikt, moet u voor dit onder- 
deel kiezen. Als er al een tekst in het ge- 
heugen staat, wordt die door deze keuze 
gewist. Allereerst wordt er gevraagd hoe- 
veel aanslagen een regel mag bevatten. In- 
dien u over een 80-koloms printer beschikt, 
kunt u voor 80 kiezen. Kiest u in dat geval 
voor 60 dan maakt het programma auto- 
matisch voor en achter een kantlijn. Na het 
invoeren van de kolom-breedte verschijnt 
er een stilstaande cursor ten teken dat u 
kunt beginnen met het invoeren van tekst. 


ers voorziet zijn programma zelf van instructies. 


Vier lettertekens voor het eind van een re- 
gel verschijnt in, beeld een tekentje dat 
aangeeft dat u de regel moet gaan afbre- 
ken. Als u meer dan vier tekens voor het 
einde afbreekt, kan het gebeuren dat dat 
teken blijft staan. In een uitdraai is het ech- 
ter niet te zien. Indien u de volle kolom- 
breedte heeft volgetikt, werken alleen nog 
de return- en delete-toetsen. Met return 
gaat u naar de volgende regel, met delete 
kunt u de laatst ingetikte letters verwijde- 
ren, zodat u mooi kunt aforeken. Met toets 
@ keert u terug naar het menu. 


a Toevoegen van tekst 

Met deze optie kunt u in een bestaande 
tekst passages toevoegen zonder dat de 
bestaande tekst verloren gaat. 


t Regels tussenvoegen 

Het programma vraagt u vanaf welke regel 
u tekst wilt tussenvoegen en hoeveel re- 
gels deze tekst omvat. Dat kunt u controle- 
ren met de keuzemogelijkheid p uit het 
hoofdmenu. Daarna is aan u de keuze de- 
ze regels open te laten of ze te vullen met 
tekst. Indien u gaat typen, staan u dezelfde 
mogelijkheden ter beschikking als bij het 
toevoegen van tekst. De tekstverwerker 
meldt u automatisch wanneer de openge- 
laten ruimte is opgevuld. 


k Tekst verwijderen 

Het programma vraagt u de eerste en de 
laatste regel van de te verwijderen passa- 
ge. Met commando p van het menu kunt u 
precies opvragen welke regels u moet ver- 
wijderen. 


s Bewaren van tekst 

Het programma vraagt op welk medium u 
de tekst wilt opslaan: schijf of cassette. 
Daarna wordt gevraagd onder welke naam 
de tekst moet worden opgeslagen. Op 
schijf zoekt de computer zelf wel of er nog 
genoeg ruimte beschikbaar is, maar op 
cassette moet u er zelf zorg voor dragen 
dat u niet over een ander programma heen 
schrijft. 


| Ophalen van tekst 
Voor deze mogelijkheid kiest u als u een 
eerder gemaakte tekst die u op schijf of 
cassette heeft opgeslagen, wilt terughalen. 


Allereerst wordt er weer naar het betreffen- 
de medium gevraagd en daarna naar de 
naam van de tekst. Na het laden gaat u te- 
rug naar het hoofdmenu. 


v Verbeteren van tekst 

Met deze optie kunnen zinnen die u met de 
tekstverwerker heeft gemaakt, worden ver- 
beterd. De computer vraagt op welk regel- 
nummer hij moet beginnen en waar hij 
moet eindigen. Dat kunt van te voren weer 
controleren met keuze-mogelijkheid p. De 
tekst wordt op het scherm getoond met er- 
onder het woordje WORDT. U kunt nu de 
regel opnieuw en verbeterd invoeren. Na 
een extra controle gaat u weer naar het 
hoofdmenu terug. 


t Vervangen van tekst 

Deze optie kan u bij het maken van grotere 
rapporten en dergelijke veel werk bespa- 
ren. U krijgt hier een aantal extra keuze- 
mogelijknheden, namelijk: 

- tekst dupliceren 

- zinnen vervangen 

- woorden vervangen 


Onder de keuze ‘tekst dupliceren’ vraagt 
het programma de regelnummers van de 
eerste en de laatste regel die gedupliceerd 
moeten worden. Daarna geeft u het regel- 
nummer aan van de regel waar de gedupli- 
ceerde tekst geplaatst moet worden. De 
tekst wordt automatisch vanaf het nieuwe 
regelnummer gedupliceerd. Dit is een uit- 
stekende hulp bij het verplaatsen van zin- 
nen of blokken tekst. 


Met ’zinnen vervangen’ bereikt u hetzelfde 
effect als met het eerder besproken VER- 
BETEREN. 

Met ’woorden vervangen’ kunt u in een 
klap door een hele tekst een bepaald 
woord door een ander vervangen. Er wordt 
gevraagd in welk bereik van regels het 
woord voorkomt. ledere zin waarin het te 
vervangen woord voorkomt, wordt op het 
scherm getoond en steeds wordt gevraagd 
of het betreffende woord hier ook inder- 
daad moet worden vervangen. Het pro- 
gramma schept binnen de regel zelf nieu- 
we ruimte als het nieuwe woord langer is 
dan het oorspronklijke. 


z Laten zien van tekst 

Indien u voor deze mogelijkheid kiest, laat 
het programma een voor een de regels 
zien die u tot nu toe heeft ingevoerd. U 
wandelt met behulp van de cursor door de 
tekst heen. > 
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p Printen van tekst 

Deze optie heeft niets met het op papier 
zetten van uw tekst te maken, maar zet de 
tekst op het scherm met regelnummers er 
voor. 

Hierdoor kunt u aangeven in welke regels 
er iets veranderd moet worden. Deze optie 
kan u bij andere programma-onderdelen 
van pas komen, zoals we al eerder hebben 
gezien. 


0 Opvragen van vrije geheugen 

Door middel van het opvragen van de vrije 
geheugenruimte kunt u zelf ongeveer be- 
palen hoeveel ruimte voor teksten u nog 
over heeft. Bij bijvoorbeeld een kolom- 
breedte van 50 letters en 10000 bytes free 
kunt u nog 200 regels tekst invoeren. 


e Maken van standaard zinnen 

Hiermee kunt u steeds weer terugkerende 
zinnen onderbrengen onder een functie- 
toets. Omdat er 8 functietoetsen zijn, kun- 


TEKSTVERWERKER 
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nen er 8 standaardzinnen worden inge- 
voerd. Bij Maken van tekst’ en ’Toevoe- 
gen van tekst’ kunt u midden in een zin op 
een functietoets drukken waarna de betref- 
fende standaardzin wordt ingelast. 

Door in plaats van zinnen spaties in te voe- 
ren, kan een van de functietoetsen als ta- 
bulator fungeren. 


q Tekst naar printer 

Hiermee wordt de tekst uiteindelijk op pa- 
pier gezet. Het programma vraagt hoeveel 
regels er op een pagina gaan en daarna 
hoeveel aanslagen er op een regel moe- 
ten. Daarmee kunt u de tekst op papier 
centreren. 

Indien uw printer meer kolommen ter be- 
schikking heeft dan uw tekstbreedte, zorgt 
het programma ervoor dat uw tekst mooi 
midden op het papier komt te staan. 

Op ieder vel worden bovenaan 5 regels en 
onderaan 10 regels wit gelaten. 


10 rem standaard voor 64 en sx64<shift>/<spatie>db 
cl$=chr$(147):ho$=chr$(19):rvS$=chr$(18):ro$=chrs$(146)<shift>/<spatie>3£ 
ri$=chr$(29):leS$=chr$(157):do$=chr$(17):up$=chr$(145)<shift>/<spatie>36 
sc=1024:co=55296<shift>/<spatie>34 
printchrs(14)<shift>/<spatie>68 
poke 650,128<shift>/<spatie>8f 
poke53280,14:poke53281,6<shift>/<spatie>4de 


OPBOUW 
PROGRAMMA 

In de régels 10 tot en met 40 worden grafi- 
sche tekens, schermbesturingstekens en 
dergelijke ondervangen. Hierdoor wordt 
het betrekkelijk gemakkelijk om deze tekst- 
verwerker aan een andere computer dan 
de CBM-64 aan te passen, u hoeft namelijk 
alleen die eerste regels aan te passen. 
Het programma is gestructureerd geschre- 
ven rond een menu. Vanuit dat menu 
maakt u steeds een keuze waardoor een 
bepaalde subroutine wordt aangeroepen. 
De regelnummers van-die subroutines 
vindt u in de programmaregels 300 tot en 
met 420. 

Regel 650 bepaalt dat alle toetsen re- 
peteren. 

Een belangrijke subroutine is de routine op 
de regels 3780 en 3790 die steeds vraagt 
of er wel een toets is ingedrukt. 

Regel 3590 bepaalt hoe uw tekst er op pa- 
pier komt uit te zien. U kunt het hier ge- 
bruikte OPEN commando aanpassen aan 
de behoeften van uw eigen printer. 


flS=chr$(133):£2$=chr$(137):£3$=chr$(134):£4$=chr$(138)<shift>/<spatie>66 
£5S=chr$(135):f6$=chr$(139):£7$=chr$(136):£8$=chr$(140)<shift>/<spatie>6él 
dimt$(1000),sz$(9)<shift>/<spatie>ab 
printcl$;tab(13) "TEKSTVERWERKER"<shift>/<spatie>6f 
printdoS;rvS"aantal regels :"pl<shift>/<spatie>ee 
printrvS$"tekstbreedte :"ac<shift>/<spatie>lb 
printdos;"Commando’s"<shift>/<spatie>fd 
printdo$;"m maken nieuwe tekst"<shift>/<spatie>62 
print"a toevoegen van tekst"<shift>/<spatie>12 
print"t regels tussen voegen"<shift>/<spatie>57 
print"k tekst verwijderen"<shift>/<spatie>76 
print"s bewaren van tekst"<shift>/<spatie>18 
print"l ophalen van tekst"<shift>/<spatie>68 
print"v verbeteren van tekst"<shift>/<spatie>37 
print"r vervangen van tekst"<shift>/<spatie>67 
print"z laten zien van tekst"<shift>/<spatie>6b 
print"p printen van tekst"<shift>/<spatie>47 
print"o opvragen geheugen"<shift>/<spatie>2c 
print"e maken standaard zin"<shift>/<spatie>b2 
print"q tekst naar printer"<shift>/<spatie>ed 
printdo$;doS$;"wat is uw commando ?"<shift>/<spatie>ed 
gosub3780<shift>/<spatie>a2 
ifmoS="m"then440<shift>/<spatie>es8 
1fmo$="a"then950<shift>/<spatie>f2 
ifmoS="t"thenl670<shift>/<spatie>ad 
ifmos="k"thenl1460<shift>/<spatie>bb 
ifmoS="s"then2000<shift>/<spatie>bec 
ifmoS="1"then2280<shift>/<spatie>a3 
lfmos="v"then2550<shift>/<spatie>85 
ifmo$S="r"then2800<shift>/<spatie>93 
ifmo$="z"then920<shift>/<spatie>a4 
ifmoS="p"then990<shift>/<spatie>s5f 
ifmo$="o"thenl170<shift>/<spatie>6l 
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420 
430 
440 
450 


470 


500 
510 
520 
530 
540 
550 
560 
570 
580 
590 
600 
610 
620 
630 
640 
650 
660 
670 


ifmos="e"thenl210<shift>/<spatie>64 

ifmoS="q"then3590<shift>/<spatie>43 

goto290<shift>/<spatie>ld 

printcl$;rv$;" | MAKENNIEUWETEKST. ";roS$<shift>/<spatie>33 
tu=0<shift>/<spatie>40 

printdoS;"Druk @ toets in om te stoppen":print"(even geduld)"<shift>/<spatie 


forj=1tol000<shift>/<spatie>3a 
t$(j)=""snextj<shift>/<spatie>9a 
printdo$;"Hoeveel karakters op een regel"<shift>/<spatie>f4 
input" (max.:255)";ac<shift>/<spatie>3a 

pl=l:printcl$;rv$;" maken nieuwe tekst ";ro$<shift>/<spatie>de 
printrvs;" ";ro$;<shift>/<spatie>91l 
getaS$:ifa$="@"thenll0<shift>/<spatie>65 
ifaS=chr$(20)andhs$=""then530<shift>/<spatie>66 

yaar eet aipcrpel pale pie hs 
ifaS=fl1SthenprintleS;sz$(l);rvS;" ";roS;:h$=h$+szs 
peeps Gueoreinticn con ree "sro$;:hS=h$+szs$ 
ifaS=f3SthenprintleS;sz$ ( rv$;" "sroS;:h$=hS$+szs 


(1)<shift>/<spatie>0e 
3 ( 
3% ( 
ifaS=f4Sthenprintles;sz$(4);rv$;" ";roS;:hS=h$+sz$ ( 
yi ( 
)¥ ( 
dy ( 
( 


) 
)<shift>/<spatie>07 
)<shift>/<spatie>78 
)<shift>/<spatie>75 
ifa$S=f5SthenprintleS$;sz$(5 i "sroS;:hS=h$+sz$(5) 
ifaS=f6SthenprintlesS;sz$(6 rve;" "sroS; :h$=h$+szS$(6) 
ifa$S=f£7$thenprintle$;sz$(7);rv$;" ";roS;:h$=h$+sz$(7) 
ifaS=f£8SthenprintleS;sz$(8);rv$;" ";roS;:h$=h$+sz$(8) 
printleS;" ";leS;aS;rv$;" ";ro$;<shift>/<spatie>5c 
ifaS=risthenh$=hs+""<shife>/<spatie>f4 
ifaS=leSthenhS=left$(hs$,len(h$)-1)<shift>/<spatie>23 
ifaS=chr$(20)andlen(h$)>0thenhS=left$(h$,len(h$)-1):printle$;:goto520<shift>/ 


<shift>/<spatie>62 
<shift>/<spatie>5b 
<shift>/<spatie>54 
<shift>/<spatie>4l 


1 
Z 
3 
4 
5 
6 
7 
8 


<spatie>71 


680 
690 
700 
710 
720 
730 
740 
750 
760 
770 
780 
790 
800 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 
930 
940 
950 
960 
970 
980 
990 


ifa$=chr$(20)then 530<shift>/<spatie>a3 

ifaSs= se ihdentoral ea ipsis et jaies flespenaslescl 
ifaS=ho$thengoto8s00<shift>/<spatie>d7 
ifaS=chr$(13)thengoto830<shift>/<spatie>49 

iflen(h$)=ac-3 then printriS$;chr$(166);leS;le$;<shift>/<spatie>29 
iflen(h$)=acthenprintle$;" "leS;<shift>/<spatie>53 
iflen(h$)=acthenprintrvs;" ";ro$;<shift>/<spatie>4f 
iflen(h$)=acthen800<shift>/<spatie>e6 
ifaS=chr$(13)thengoto830<shift>/<spatie>77 
ifaS=riSora$=leSora$=hoSora$=chr$(20)then790<shift>/<spatie>56 
h$S=hS$+aS$<shift>/<spatie>72 

goto530<shift>/<spatie>aa 
getaS:ifa$<>chr$(13)anda$<>chr$(20)then800<shift>/<spatie>66 
ifaS=chr$(20)then670<shift>/<spatie>27 
ifa$S=chr$(13)thenprintle$;ro$;" "sprintrvS;" "ro$;<shift>/<spatie>3f 
t$(pl)=h$<shift>/<spatie>8e 
ifpl<=10000rp1<=1000-vthen870<shift>/<spatie>15 
printdo$;do$;"Het geheugen is vol"<shift>/<spatie>68 
gotoll0<shift>/<spatie>e6 

pl=pl+l1:hs=""<shift>/<spatie>a8 
i1ftu=lthenl910<shift>/<spatie>d4 
1ftu=2then2710<shift>/<spatie>do 
iftu=3then3190<shift>/<spatie>20 

goto530<shift>/<spatie>32 

printcl$:fori=ltopl<shift>/<spatie>ed 
printt$(i):gosub3780:ifmoS$="@"theni=pl: govelid<shisesfcapwetesia 
nexti:gotoll0<shift>/<spatie>e7 

printcl$;rv$;" TOEVOEGENVANTEKST. ";roS<shift>/<spatie>cl 
printdos;"Druk @ om te stoppen"<shift>/<spatie>d6 
printdoS;do$;:h$=""<shift>/<spatie>b4 

goto520<shift>/<spatie>69 

printclS;rv$;"  PRINTENVANTEKST. ";roS<shift>/<spatie>bd 
printdo$;"Welke regelnummers wilt u zien ?"<shift>/<spatie>c4 
printdoS;"1. alles"<shift>/<spatie>14 

print"2. een bereik"<shift>/<spatie>26 
gosub3780:mo=val(mo$):if mo<lormo>2thenl030<shift>/<spatie>4e 
ifmo=lthenrl=1:r2=pl<shift>/<spatie>ad 
i1fmo=lthen1l120<shift>/<spatie>bl 
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1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 


1580 v= 


1590 
1600 
1610 


1620, 


1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 


__ CADEAU VAN COMMODORE DOSSIER __ 


printdo$;do$;:input"Wat is het eerste regelnr ";rl<shift>/<spatie>aa 
printdoS$;do$;:input"Wat is het laatste regelnr " jx2<shift>/<spatie>red 
ifr2<rlorrl<0orr2>plthen1100<shift>/<spatie>8d 
gotoll20<shift>/<spatie>cd 

printdo$;do$;"Regelnummers van ";1;" tot ";pl<shift>/<spatie>77 
gosub3780:printcl$:goto990<shift>/<spatie>d8 
printclS<shift>/<spatie>d6é 

fori=rltor2<shift>/<spatie>b3 

printi;" ";tS(i)<shift>/<spatie>98 
gosub3780:ifmoS="@"theni=r2:gotoll0<shift>/<spatie>21 
nexti:gotoll0<shift>/<spatie>c4 

printclS;rv$;"  OPVRAGENGEHEUGEN. "sroS<shift>/<spatie>88 
printdoS;do$;do$;doS;do$;"U heeft nog ";rv$;fre(0) ;ro$<shift>/<spatie>57 
print"geheugen plaatsen over"<shift>/<spatie>33 
gosub3780:gotoll0<shift>/<spatie>b6é 
printclS;rv$;"MAKENSTANDAARDZINNEN" ;ro$<shift>/<spatie>20 

for i=l to 8:sz$(i)=""snext i<shift>/<spatie>0b 

printdo$;do$;"U kunt 8 standaardzinnen of tabulator"<shift>/<spatie>97 
print"stops invoeren welke u tijdens het"<shift>/<spatie>3b 
print"maken van de tekst met de functié"<shift>/<spatie>2d 
print"toetsen [fl] - [f8] kunt aanroepen"<shift>/<spatie>6e 
printdoS;"Hoeveel wilt U er"<shift>/<spatie>43 
input"invoeren";as:ifas>8thenl210<shift>/<spatie>24 
printclS$<shift>/<spatie>bd 

fori=ltoas<shift>/<spatie>ec 

printi;" ";rv$;" ";ro$;<shift>/<spatie>e9 

gosub3780<shift>/<spatie>ac 

ifmoS=chr$(13)thenprintles;" "<shift>/<spatie>e4 
ifmo$=chr$(13)thenprintmo$<shift>/<spatie>fa 

if mo$=chr$(13)thenl1390<shift>/<spatie>34 

printles;:" "sleS;moS;rv$;" "roS$;<shift>/<spatie>f3 
sz$(i)=sz$(i)+mo$<shift>/<spatie>6él 

gotol320<shift>/<spatie>e8 

nexti<shift>/<spatie>a0 
printcl$;rv$;"STANDAARDZINNENZIUN.";ro$<shift>/<spatie>16 
printdo$;do$<shift>/<spatie>25 

nedaitat tram ed 4) cones Peep 

printj;" ";sz$(j)<shift>/<spatie>06 

meni cehieen /copasiexed 

gosub3780:gotoll0<shift>/<spatie>ad 
printcls;rv$;"VERWIJDERENVANTEKST.";roS<shift>/<spatie>c6 
printdo$;do$;"Hoogste regelnummer "spl-l<shift>/<spatie>07 
printdoS$;doS;:input"wat is het eerste regelnr ";rl<shift>/<spatie>c7 
printdoS;doS$;:input"wat is het laatste regelnr ";r2<shift>/<spatie>94 
ifr2<=plandrl<=r2andrl>0then1520<shift>/<spatie>6ée 

print"Onjuiste regelnummers":gotoll0<shift>/<spatie>4a 

printcl$;"Weet u zeker dat deze tekst verwijderd"<shift>/<spatie>£9 
input"moet worden";moS<shift>/<spatie>5l 
ifmo$<>"Jja"andmo$<>"j"thenll0<shift>/<spatie>f0 
fori=rltor2<shift>/<spatie>d5 

ts(i)=""<shift>/<spatie>94 

next i<shift>/<spatie>ef 

(r2+1)-rl<shift>/<spatie>fec 

vv=pl-(r2+1)<shift>/<spatie>cf 

fori=Otovv-l<shift>/<spatie>32 

tS (rl+i)=t$(r2+1+i)<shift>/<spatie>66 

nextix<shift>/<spatie>99 

pl=rl+vv<shift>/<spatie>3f 

fori=pltopl+v:let t$(i)="":next<shift>/<spatie>cc 
printdo$S;do$;do$;do$;do$;do$;do$;" Tekst verwijderd"<shift>/<spatie>06 
gosub3780:gotoll0<shift>/<spatie>78 ; 
printcl$;rv$;" REGELSTUSSENVOEGEN" ; ro$<shift>/<spatie>s80 
printdo$;do$;"Van waaraf moet tussen"<shift>/<spatie>ed 

input"gevoegd worden";rl<shift>/<spatie>39 
1frl<plthenl730<shift>/<spatie>47 

printdo$;"U hoeft niet tussen tevoegen Ukunt gewoon tekst toevoegen."<s 


hift>/<spatie>ea 





1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 
2000 


gosub3780:gotoll0<shift>/<spatie>bc . 

printdoS;do$;"Hoeveel regels tussen"<shift>/<epatiers5 
input"voegen";r2<shift>/<spatie>04 

fori=Otopl-(rl+l1)<shift>/<spatie>70 

tS (pl+r2-i)=t$(pl-i) :nexti<shift>/<spatie>6f 
fori=rl+ltorl+r2<shift>/<spatie>63 

tS(i)=""snexti<shift>/<spatie>89 

pl=pl+r2<shift>/<spatie>80 

printcl$;"Er zijn ";rv$;r2;ro$;" regels tussen gevoegd"<shift>/<spatie>02 
printdo$;do$;"U kunt op deze tussen-gevoegde regels"<shift>/<spatie>49 
print"typen of wilt u ze open laten"<shift>/<spatie>d7 
printdo$;doS$;rv$"T";ro$;"ypen of ";rv$;"o";ro$;"penlaten"<shift>/<spatie>21 
getmo$S:ifmoS="o"thenll0<shift>/<spatie>4d 


ifmoS<>"t"thenl1840<shift>/<spatie>6c 


print" ";<shift>/<spatie>cl 

pl=pl<shift>/<spatie>86 

pl=rl+l<shift>/<spatie>09 

tu=l<shift>/<spatie>e7 

goto530<shift>/<spatie>d4 
ifpl<rlt+r2+lthenl900<shift>/<spatie>c8 

printdo$;rv$;"U kunt nu niet meer tussenvoegen. typ @";ro$<shift>/<spatie>d9 
gosub3780<shift>/<spatie>0c 
ifmo$<>"@"thenl930<shift>/<spatie>d0d 
pl=pl:tu=0<shift>/<spatie>ef 

print "WEGAANNAARHETMENU"<shift>/<spatie>fb 
gosub3780:gotoll0<shift>/<spatie>b7 
pl=pl+r2+l<shift>/<spatie>58 

gotoll0<shift>/<spatie>78 

printclS;rv$;"  BEWARENVANTEKST. ";ro$<shift>/<spatie>a5d 


<shift>/<spatie>94 


2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
2110 
2120 
2130 
2140 
2150 
2160 
2170 
2180 
2190 
2200 
2210 
2220 
2230 
2240 
2250 
2260 
2270 
2280 
2290 
2300 
2310 
2320 
2330 
2340 
2350 
2360 
2370 


2380 


printdo$;do$;"Hoe heet de file of"<shift>/<spatie>94 
input"brief";nf$<shift>/<spatie>2b 

printdo$;"Bewaren op:"<shift>/<spatie>a9 

print"1l. tape"<shift>/<spatie>59 

print"2. floppy"<shift>/<spatie>b3 
getmo$S:ifmo$<>"1"andmo$<>"2"then2060<shift>/<spatie>3d 
if moS="2"then 2200<shift>/<spatie>94 

printdoS;"Dit duurt even"<shift>/<spatie>26 
openl,1,1,nf$<shift>/<spatie>8c 
print#l,ac<shift>/<spatie>bb 
print#l,pl<shift>/<spatie>daf 
fori=ltopl<shift>/<spatie>b3 
l=len(t$(i)):print#1,l<shift>/<spatie>ad 
forj=ltol<shift>/<spatie>f4 
print#1l,mid$(t$(i),j,1)<shift>/<spatie>63 
nextj<shift>/<spatie>b0 

nexti<shift>/<spatie>b9 

closel<shift>/<spatie>ld 

goto 110<shift>/<spatie>3f 
£S="0:"4nf£$+",s,w"<shift>/<spatie>62 
open2,8,2,f$:print#2,pl:print#2,ac<shift>/<spatie>5d 
fori=ltopl<shift>/<spatie>57 

if t$(i)=chr$(13)or t$(i)=""then tS$(i)="" "<shift>/<spatie>éc 
print#2,t$(i)<shift>/<spatie>76 
nexti<shift>/<spatie>09 

close2<shift>/<spatie>4de 

gotoll0<shift>/<spatie>6f 

PELNtGLS srvs;" OPHALENVANTEKST";roS<shift>/<spatie>85 
printdos;dos;"Hoe heet de file of"<shift>/<spatie>b3 
input"brief";nf$<shift>/<spatie>3c 

printdoS;"Laden van :"<shift>/<spatie>23 

print"l. tape"<shift>/<spatie>bf 

print"2. floppy"<shift>/<spatie>aa 
getmo$:ifmos<>"]"andmo$<>"2"then 2340<shift>/<spatie>15 
Lf mo$="2"then 2470<shift>/<spatie>ac 
openl,1,0,nf$<shift>/<spatie>9e 
input#l,ac<shift>/<spatie>d0d 
input#1l,pl<shift>/<spatie>c0 
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2390 
2400 
2410 
2420 
2430 
2440 
2450 
2460 
2470 
2480 
2490 
2500 
25:10 
2520 
253:0 
2540 
Zao) 
2560 
2570 
2580 


fori=ltopl<shift>/<spatie>ac 

input#1l,l<shift>/<spatie>be 

forj=ltol<shift>/<spatie>c3 
get#l,ttS$:get#l,a$:t$(i)=t$(1)+tt$<shift>/<spatie>00 
nextj<shift>/<spatie>bf 

nexti<shift>/<spatie>4a 

closel<shift>/<spatie>0a 

goto 110<shift>/<spatie>2c 
f£S="0:"4nfS$+",s,r"<shift>/<spatie>58 
open2,8,2,f£$<shift>/<spatie>50 
input#2,pl:input#2,ac<shift>/<spatie>97 
fori=ltopl-l<shift>/<spatie>a4 
input#2,t$(i)<shift>/<spatie>65 

nexti<shift>/<spatie>la 

close2<shift>/<spatie>79 

gotoll0<shift>/<spatie>5c 

printcl$S;rv$;" VERBETERENVANTEKST";roS<shift>/<spatie>e5 
input"Vanaf waar wilt u verbeteren";rl<shift>/<spatie>5l 
ifrl<plthen2600<shift>/<spatie>e4 

printdo$;"U hoeft niet te verbeteren u kunt gewoontekst toevoegen."<shift>/< 


spatie>68 


2590 
2600 
2610 
2620 
2630 
2640 
2650 
2660 
2670 
2680 
2690 
2700 
2710 
2720 
2730 
2740 
2750 
2760 
2770 
2780 
2790) 
2800 
2810 
2820 
2830 
2840 
2850 
2860 
2870 
2880 
2890 
2900 
2910 
2920 
2930 
2940 
29.50 
2960 
29.70 
2980 
2990 
3000 
3010 
3020 
3030 
3040 
3050 
3060 
3070 
3080 
3090 


gosub3780:gotoll0<shift>/<spatie>16 
printdoS;do$;:input"Tot waar";r2<shift>/<spatie>b5 
1fr2>=rlandr2<=plthen2640<shift>/<spatie>c6 
print"Foutieve invoer"<shift>/<spatie>ll 
gosub3780:gotoll0<shift>/<spatie>4e 

printcl$;"U kunt nu verbeteren"<shift>/<spatie>37 
printdoS ;doS$:tu=2<shift>/<spatie>49 
pl=pl:pl=rl<shift>/<spatie>56 
fori=pltor2<shift>/<spatie>c6 
printrvsS;t$(i);roS$<shift>/<spatie>ca 
print"WORDT"<shift>/<spatie>cb 

goto520<shift>/<spatie>38 

printdo$:input"Is de zin nu goed";mo$<shift>/<spatie>5c 
ifmoS="nee"ormoS="n"then2680<shift>/<spatie>3a 
nexti<shift>/<spatie>6b 

printdo$;"U moet nu ophouden met verbeteren."ro$<shift>/<spatie>89 
printdo$S;"Toets @"<shift>/<spatie>80 
gosub3780<shift>/<spatie>43 
ifmosS<>"@"then2760<shift>/<spatie>93 
tu=0<shift>/<spatie>55 

pl=pl:gotoll0<shift>/<spatie>a0 

printcl$;rv$;" VERVANGENVANTEKST. ";roS$<shift>/<spatie>94 
printdo$;"Wilt u zinnen of woorden vervangen"<shift>/<spatie>81l 
input"typ zin of woord";moS$<shift>/<spatie>ff 

if mo$="woord" ormoS="w"then 3250<shift>/<spatie>8b 
printcls;"Wilt u:"<shift>/<spatie>53 

printdo$S;"1. Tekst dupliceren"<shift>/<spatie>7d 
print"2.Een zin vervangen"<shift>/<spatie>c5 
getmoS$<shift>/<spatie>ba 
ifmoS<>"1l"andmoS$<>"2"then2870<shift>/<spatie>c6 

if moS="2"then3060<shift>/<spatie>ce 
printcl$<shift>/<spatie>ed 

printrvs;"Tekst dupliceren";roS$<shift>/<spatie>33 
printdo$;"Wat is de eerste van de zinnen die"<shift>/<spatie>0f 
input"gedupliceerd moeten worden";rl<shift>/<spatie>aa 

if rl>pl then 110<shift>/<spatie>a5 

input"Wat is de laatste";r2<shift>/<spatie>f0 
ifrl<=r2andr2<plthen2980<shift>/<spatie>d6 
gotoll0<shift>/<spatie>28 

print "vanaf welke regel moet de tekst"<shift>/<spatie>0e 
input"gedupliceerd worden";rb<shift>/<spatie>3d 
fori=Oto(r2-rl)<shift>/<spatie>f4 
t$(rb+i)=t$(rl+i)<shift>/<spatie>08 
nexti<shift>/<spatie>0c 

printdo$;do$;rvsS"tekst gedupliceerd"<shift>/<spatie>0a 
ifpl<rethenpl=re<shift>/<spatie>c6 
gosub3780:gotoll0<shift>/<spatie>e3 

printcl$;"Welke zin wilt u vervangen"<shift>/<spatie>fc 
inputrl<shift>/<spatie>13 
ifrl<plthen3120<shift>/<spatie>e4 

print"U hoeft niet te vervangen u kunt gewoon"<shift>/<spatie>3b 
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printup$;"tekst toevoegen."<shift>/<spatie>8e 
goto3050<shift>/<spatie>a5 

printdo$;"De zin was"<shift>/<spatie>28 
printdoS;rv$;t$(rl);ro$<shift>/<spatie>b0 
tu=3<shift>/<spatie>c8 

pl=pl<shift>/<spatie>8d 

pl=rl<shift>/<spatie>99 

printdoS;"De zin wordt nu"<shift>/<spatie>5e 
goto520<shift>/<spatie>de 

printdo$;"De zin is verbeterd"<shift>/<spatie>50 
tu=0:pl=pl<shift>/<spatie>fa 

printdoS$;"Wilt U nog een zin verbeteren?"<shift>/<spatie>lc 
printdoS:input"ja of nee";mo$<shift>/<spatie>c0 

if mo$<>"ja" andmo$<>"j" then 110<shift>/<spatie>60 

goto 3060<shift>/<spatie>28 

printclS;rv$;"een woord vervangen";roS<shift>/<spatie>75 
printdo$;"Vanaf welke regel moet het woord"<shift>/<spatie>cl 
input"vervangen worden";rl<shift>/<spatie>66 
ifrl<plthen3310<shift>/<spatie>3d 

"letekst heeft maar ";pl;"regels<shift>/<spatie>c3 
goto3050<shift>/<spatie>67 

input"Tot welke regel";r2<shift>/<spatie>fa 
ifr2>=rlandr2<=plthen3350<shift>/<spatie>0f 
printdo$;"Onjuiste invoer van regelnummers"<shift>/<spatie>6l 
gosub3780:gotoll0<shift>/<spatie>03 

printcl$;"Welk woord moet vervangen worden"<shift>/<spatie>04 
inputwlS$<shift>/<spatie>ea 

printdo$;do$;"Wat wordt het nieuwe"<shift>/<spatie>5a 
input"woord";w2S<shift>/<spatie>87 

lw=len(wl$):lv=len( | Sohal siecle 

fori= ebayer tee sistem fl 
lz=len(t$(i))<shift>/<spatie>0l 
forj=ltolz<shift>/<spatie>ab 
w3S=mid$(t$(i),j,len(wl$))<shift>/<spatie>a0 
ifw3$<>wlS$Sthennextj<shift>/<spatie>99 

if j>=lzthen3560<shift>/<spatie>04 

printdo$;"De zin waar het woord in voorkomt is"<shift>/<spatie>el 
printdoS;i;"  "srv$;t$(i);ro$<shift>/<spatie>66 

print"Moet het woord hierin"<shift>/<spatie>b6 
input"vervangen worden";mo$<shift>/<spatie>46 
ifmo$<>"Jja"andmos$<>"j"then3560<shift>/<spatie>63 
hu$S=mid$(t$(i),1,j-1)+w2$<shift>/<spatie>c9 
hls=mid$(t$(i),j+len(wl$),1z)<shift>/<spatie>a7 
t$(i)=hus+hl$<shift>/<spatie>83 

printdoS;"De nieuwe zin wordt:"<shift>/<spatie>cd 
printdoS;doS;rv$;t$(i);ro$<shift>/<spatie>6b 

next i<shift>/<spatie>2e 

printdoS;"Alle zinnen zijn verbeterd."<shift>/<spatie>b6 
goto3050<shift>/<spatie>7e 

open 1,4<shift>/<spatie>be 

printcl$;rv$;"  Printen van tekst ";roS<shift>/<spatie>50 
printdo$;do$;"Hoeveel regels gaan op"<shift>/<spatie>69 
print"een pagina (65 op A4)"<shift>/<spatie>05 

input ar<shift>/<spatie>b6 

printdoS;do$;"moet er getabuleerd"<shift>/<spatie>fl 
input"worden";ta$<shift>/<spatie>c6 
iftaS$="ja"thenprint"hoeveel karakters op"<shift>/<spatie>7a 
iftasS="Ja"theninput"een regel ";af<shift>/<spatie>52 
af=int((af-ac)/2):ifaf<lthenaf=1l<shift>/<spatie>48 
ar=ar-l10<shift>/<spatie>7c 

fori=lto5:print#l," "“:next<shift>/<spatie>87 
forj=ltoplstepar<shift>/<spatie>3a 
fori=jtojtar-l<shift>/<spatie>7b 

if taS="JjJa"thenprint#l,spc(af);<shift>/<spatie>0e 
print#l,tS(i)<shift>/<spatie>2f 

nexti<shift>/<spatie>63 

forx=ltolO:print#1," ":nextx<shift>/<spatie>3e 

next j:closel:gotoll0<shift>/<spatie>54 
getmo$:ifmo$S=""then3780<shift>/<spatie>c3 
return<shift>/<spatie>4e 
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INFORMATICA, HET FIJNSTE UUR WV. 


De Johannes Post Mavo in Hoorn heeft 


scheiden printertje. Op het eerste gezicht 
een riante uitrusting, maar daar moeten 
dan ook maar liefst twaalf klassen het mee 
doen. 

Stuwende kracht achter het computerge- 
beuren op de Hoornse Mavo is directeur A. 
de Jong. Hij vond twee jaar geleden al dat 
zijn school aansluiting moest zoeken bij 
het computertijdperk. Hij kreeg het school- 
bestuur zo ver dat het toestemming ver- 
leende voor de aanschaf van het noodza- 
kelijke materieel. Tegelijk met de verhui- 
zing naar de nieuwbouw, die beter bevei- 


ligd kon worden tegen ongewenst bezoek, 


ook maar meteen het vak ‘informatica’ in 
het rooster opnemen. Dat leverde echter 
meer problemen op dan voorzien. 

De leraren F. Schuster (Duits) en A. Bakels 
(wiskunde) kunnen er over meepraten. Mi- 
nister Deetman van Onderwijs en de ande- 
re verantwoordelijken in Den Haag lijken 
nog steeds niet verder te willen gaan dan 
het regelmatig uitgeven van persberichten 
waarin steeds maar weer wordt on- 
derstreept dat informatica-onderwijs een 
hoge prioriteit heeft. 

Van Bakel: Wij zijn het daar uiteraard 


mee eens. Elke schoolverlater zou ver- 


a et maar kort geleden een nieuw gebouw werd dan ook overgegaan tot de aanschaf trouwd moeten zijn met de computer en 
«  betrokken. Tegelijk met de verhuizing van het genoemde computer-park. Inmid- daar willen wij best aan meewerken. Er is 
; werd een begin gemaakt met — dels heeft de school overigens ook aleen _een rapport van de Adviescommissie voor 
w  computer-onderwijs. Voor de ruim 300 klassikaal netwerk in voorbereiding. De ka- | Onderwijs en Informatietechnologie waarin 
. leerlingen van de school is het bels liggen er alom de computer van de le- er voor wordt gepleit computer-onderwijs 
y — informatica-tijdperk aangebroken. raar (voorzien van een schijfeenheid) te voor alle leerlingen van de leerplichtige 
ff verbinden met die van de leerlingen. Hij _leeftijd mogelijk te maken. De computer 
. kan dan bij hun meekijken en zij kunnen —_ moet zich maar eens breed-uit etaleren in 
© P In het informatica lokaal van de Johannes __bijvoorbeeld hun huiswerk van zijn disk op _de leslokalen.”’ 

: Post Mavo staan vijftien Commodore 64 hun bandje opnemen. 

0 computers opgesteld en natuurlijk evenzo- —_Na het inrichten van de computer-klas wil- LIEFDEWERK-OUD- 

0 veel monitors, datarecorders en een be- de de voortvarende schoolleiding natuurljk PAPIER 


In de praktijk blijkt het er allemaal even an- 
ders aan toe te gaan. De aanschaf van pro- 
grammatuur en apparatuur en het onder- 
houd en de uitbreiding daarvan komen 
voor rekening van de school. Subsidie is er 
niet voor. ’’Dat is nog tot daar aan toe,” 
verzucht leraar Schuster. ’’Een groter pro- 
bleem is dat de lessen informatica niet offi- 
ciéel in het rooster zijn in te passen. In feite 
worden de computer-lessen door de betref- 
fende leraren in hun vrije tijd gegeven. 
Liefdewerk-oud-papier heet dat. Een uurtje 
Duits inwisselen voor een uurtje informati- 





ca is wettelijk onmogelijk. De taakuren — 
de vrij invulbare uren — moeten worden 
aangewend ten behoeve van vakken die in 
het rooster zijn opgenomen. En dat is dus 
met informatica niet het geval.” 

Collega Van Bakel vult aan: ’’De faciliteiten 
die we nu hebben, zijn in feite veel te krap 
voor twaalf klassen. Je hoeft echt geen Vi- 
sicalc op te starten om te becijferen dat 
een minimum van negen lessen per jaar 
per klas toch 108 uren zijn die we anders 
bij moeder de vrouw hadden kunnen door- 
brengen. Wil je het computer-onderwijs 
echt goed en grondig opzetten, dan zou in- 
formatica een wettelijk verplicht vak moe- 
ten worden. Er dient dan een extra leer- 
kracht voor te komen, maar daar zou dan 
weer de financiéle ruimte voor moeten wor- 
den gegeven. Als men met de mond belijdt 
dat het onderwijs in deze achterloopt op de 
maatschappelijke ontwikkelingen, en als 
men dat zo bezwaarlijk vindt, dan moet 
men daar ook consequenties aan verbin- 
den en er niet van uitgaan dat er altijd wel 
een paar leraren te vinden zijn die het in 
hun vrije tijd willen doen. Al moet ik er eer- 
lijk gezegd aan toevoegen dat ik er wel 
veel plezier aan beleef.’’ 


Van Bakel volgde aan de Westfriese scho- 
lengemeenschap een computercursus om 
later in Amsterdan zijn kennis te verdie- 
pen. Hij combineert in de Commodore 64 
hobby en werk. Zo heeft hij het hele leerlin- 
genbestand van de Johannes Post Mavo in 
de machine ondergebracht en hoopt hij 
voor het volgende schooljaar een rooster- 
programma gereed te hebben. 


IN DE WEEK 


& OPEN 3, 


Foto linksboven: De 
heer Van Bakel instru- 
eert leerlingen tijdens 
de informatica-les. 
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Rechtsboven: opdracht 
voor huiswerk uit het 


PEGGY 


SPELEN 

VERBODEN 

Commodore Dossier maakt een computer- 
les mee. Duidelijk is meteen dat de vooraf- 
gaande lessen goed besteed zijn. De leer- 
lingen vinden zonder mankeren de weg op 
het toetsenbord en schrijven al zelfstandig 
kleine programma’s. Spelletjes zijn uite- 
raard favoriet, Commodore dankt er niet 
voor niets een groot deel van zijn reputatie 
aan. Maar de leraren houden zeer strak de 
hand aan de regel dat er op school geen 
Pacman wordt gespeeld en geen invaders 
worden afgeknald. Klaarblijkelijk leggen de 
leerlingen zich zonder morren bij die regel 
neer. 

Het computeronderwijs is gericht op het 
overwinnen van vooroordelen en het weg- 
nemen van drempelvrees. Praktisch bete- 
kent dat: wat kan de C64 en vooral... wat 
kan hij niet. Hoe werkt de randapparatuur, 
printer, datarecorder, schijfeenheid. De 
leerlingen gaan inzien dat de computer van 
huis uit een domme kracht is, maar dat hij 
met de juiste behandeling een nuttig stuk 
gereedschap kan worden, als je er maar 
mee om kunt gaan. 


DE KEERZIJDE 

Het leren leven met de computer moet in 
de opvatting van de Johannes Post Mavo 
gebeuren vanuit een evangelische levens- 
beschouwing. ’’Daarom,” formuleert de 
heer Schuster zijn visie, ’’gaan we dieper 
in op de maatschappelijk relevantie van 
het informatica-tijdperk. De vooruitgang 
brengt gevaren met zich mee. Wij probe- 
ren de jeugd daar weerbaar tegen te ma- 
ken. Onze levensbeschouwing tekent voor 
liefde voor de medemens. Je mag niet over 
het hoofd zien dat je met behulp van de 
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TEKEN DIT HUISJE EN BOOMPJE 


NA .TEKEN EEN DEUR EN EEN RARMPJE 
IN HET HUISJE 

ALS JE HIERMEE KLAAR BENT, 

BEDENK ER DAN WAT BIJ. 





computer je medemensen veel geestelijke 
schade kunt berokkenen. ledere burger 
krijgt een computernummer omgehangen. 
Wat doe je daarmee. Beeldschermen kun- 
nen gemakkelijk als oncontroleerbare voy- 
eurs in de bestanden van de burgerij gaan 
wroeten. lemand kan voor het leven gete- 
kend zijn als een onbevoegde toegang 
krijgt tot een gegevensbestand en de ge- 
gevens daarvan verkeerd gaat interprete- 
ren. Wij vinden dat we moeten waarschu- 
wen tegen dergelijke mogelijke aantasting 
van de privacy. Klassikaal doen we dat aan 
de hand van tijdschriften- en kranten- 
artikelen. Het is zinvol de keerzijden van 
waar we mee bezig zijn te belichten.” 


OUDERS ZIJN 
GEINTERESSEERD 

De reacties van de leerlingen op het com- 
puteronderwijs zijn eigenlijk onverdeeld 
gunstig. De lessen in informatica scoren 
hoog. Een aansporing om achter de com- 
puter plaats te nemen is altijd overbodig, 
‘Informatica’ is gewoon het fijnste lesuur 
van de week. Jongens zijn over het alge- 
meen wat enthousiaster dan meisjes. 
Meisjes vinden het wel leuk om met de 
computer te werken, maar de meesten 
zouden er niet over prakkizeren vader en 
moeder om zo’n ding te vragen. Dat ligt bij 
de jongens wel even anders. De computer 
staat bij vrijwel alle jongens nummer één 
op het verlanglijstje. Vrienden die thuis al 
zo’n ding hebben, worden met wat jaloerse 
ogen bekeken en hebben over het aantal 
vriendjes over het algemeen niet te klagen. 
Overigens zijn niet alleen de leerlingen 
zeer geinteresseerd. De heer Van Bakel: 
”Ouders informeren altijd zeer belangstel- 
lend naar het computer-onderwijs. Op on- 
ze open dagen wordt vaak de vraag 
gesteld of er voor hen ook niet een cursus 
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THO. aka 
1600 REM WH BRS BAKELS #K# 
1010 REM shy 13 JAAR ee 
1626 REM sak COMMODORE 64 sik 
1638 REM #&¥ SEIKOSHA GP seek 
1646 END 
1858 CLOSE 3 


door de leraren zelf sa- 
mengestelde lesboek. 


8 te regelen valt. Ik denk dat daaruit een 
Pee 8 soort angst spreekt om achter te raken. 
Men kan de kinderen thuis niet behulp- 
Zaam zijn bij het huiswerk. Ik vind die angst 
alleszins begrijpelijk, maar wel overbo- 
dig.” < 
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Hiernaast: eenvoudig 
tekenprogramma en de 
*uitdraai’. 
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IN EEN HANDOMDEAAL 


Re ae 


BOEKEN 


COMMODORE 64, 

BASIC PROGRAMMA’S IN EEN 
HANDOMDRAAI 

Auteur: Stanley R. Trost. 

Uitgeverij: Sybex 

ISBN 3-88745-107-4 

Prijs: f 29,25 

De meeste boeken met listings 
voor de Commodore 64 zijn 
hoofdzakelijk gevuld met spel- 
letjes. Dit werkje van Stanley 
Trost is daarop een gunstige 
uitzondering. Het 173 pagina’s 
tellende boek bevat ruim 65 
programma’s en subroutines 
voor zakelijke, privé en studie- 
doeleinden. Zo staan er in het 
boekje programma’s voor het 
vermenigvuldigen van grote 
getallen, voor gegevensverwer- 
king en voor gegevens-analy- 
se, gecombineerd met grafi- 
sche voorstellingen. Bijzonder 
aardig is dat Trost werkt met 
standaard subroutines. Hij ont- 
wikkelde programma’s die via 
subroutines gebruik maken 
van een reeks standaard 
programma-onderdelen. Deze 
manier van werken scheelt de 
gebruiker heel wat intoets-tijd. 
’Basic-programma’s in een 
handomadraai’ heeft niet de 
pretentie de lezer wegwijs te 
maken in Basic-land. Niettemin 
steekt men er al lezende veel 
van op. Ook het intikken van 
de programma’s geeft al een 
aardig beeld van deze pro- 
grammeertaal. De auteur van 
het boek heeft een redelijk 
geslaagde poging ondernomen 
de zaken op een logische ma- 
nier op te schrijven. Handig is 
het gebruik van twee aparte 
aanhangsels. In het eerste een 
overzicht van de subroutines, 
zoals gezegd een handige 
oplossing om de lezer of ge- 
bruiker van het boek de nodi- 
ge tijd te besparen bij het in- 
tikken. De subroutines zorgen 
er met name voor dat de pro- 
gramma’s van de verschillende 
hoofdstukken kort gehouden 
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kunnen worden. Hun functie 
wordt iedere keer beschreven 
in de REM-opdrachten. De 
subroutines zijn numeriek ge- 
rangschikt, zodat de lezer ze 
snel kan terugvinden. 

In het tweede aanhangsel laat 
Trost de lezer zien hoe de 
subroutines kunnen worden 
gebruikt om eigen program- 
ma’s te schrijven. 

Basic programma’s in een 
handomdraai’ is een boek dat 
eigenlijk niet op de boeken- 
plank van de serieuzere 
Commodore-gebruiker mag 
ontbreken. Het bevat veel han- 
dige programma’s die boven- 
dien makkelijk kunnen worden 
geintegreerd in de eigen pro- 
grammatuur. 


HET MYSTERIE VAN ARENDARVON 
CASTLE 

Auteurs: Hal Renko enm Sam Edwards 
Uitgeverij: Addison-Wesley/ Omikron 

ISBN 90-6789-011-1 

Prijs: f 29,90 

Hoe vreemd het ook mag Klin- 
ken: dit boek is vertaald uit het 
Engels (Amerikaans), maar ge- 
schreven door twee Nederlan- 
ders. Achter de pseudoniemen 
Hal Renko en Sam Edwards 
verbergen zich dr.ir. K.L. Boon 
en ir. A.R.Th. Pelsmaeker. 
Kasper Boon publiceert in Ne- 
derland ook nog onder de 
naam Albert Sickler. Beide he- 
ren hebben een uitstekende 
staat van dienst achter de rug 
en hun produkten staan voor 
kwaliteit. Dat geldt zeker ook 
voor dit nieuwe boek. Het is in 
feite een dossier van kranten- 
knipsels en aantekeningen van 
een journalist over het geheim- 
zinnige Arendarvon Castle en 
bevat tevens een listing van 
een zogenaamd ’adventure’- 
spel. De journalist is spoorloos 
verdwenen bij zijn onderzoek 
en aan de speler de taak om 
zijn lot te onderzoeken en om 
de geheimen van het kasteel 


BOEKEN/CURSUS 


te ontsluieren. Daartoe moeten 
de aantekeningen en de knip- 
sels goed worden onderzocht, 
want in tekeningen, foto’s en 
plaatjes zijn allerlei clues ver- 
werkt die helpen bij de op- 
lossing. 

Als het aan de schrijvers ligt, 
moet de enorme listing achter 
in het boek in zeven dagen 
gedoseerd worden ingetikt. Bij- 
zonder handig is dat in de 
listing een checksum is ver- 
werkt, die ongeveer op dezelf- 
de manier werkt als die van 
Commodore Dossier. Als de 
gebruiker een fout maakt bij 
het intikken, wordt hij daarvoor 
op het scherm gewaarschuwd. 
Luie spelers kunnen voor 

f 19,50 een kant en klare cas- 
sette kopen. Die cassette is 
zonder het boek onbruikbaar. 
De makers geven dan ook on- 
bekommerd instructies over 
het kopiéren van de cassette, 
omdat dat van pas kan komen 
om de al gevonden gegevens 
te bewaren. Over de kwaliteit 
van dit adventure kunnen we 
alleen zeggen dat we denken 
nog wel een aantal weken no- 
dig te hebben voordat we er 
iets over kunnen zeggen. 


CURSUS 


INTERMEDIAIR 

PERSONAL COMPUTER PAKKET 
Diverse auteurs 

Uitgeverij: Intermediair Seminars 

Prijs: f 700,- 

(10 cassettes met documentatie) 

De markt voor computercur- 
sussen begint aardig vol te ra- 
ken. Er zijn tientallen schrifte- 
lijke cursussen die onderwijzen 
in Basic of in een van de an- 
dere programmeertalen. Daar- 
naast geeft nog een aantal be- 
drijven zeer gerichte opleidin- 
gen in het gebruik van de 
computer. Niettemin heeft 
VNU Business Publications, 
onder meer uitgever van Com- 
modore Dossier, via zijn afde- 
ling Intermediair Seminars het 
terrein van de computer- 
educatie betreden. Het bedrijf 
brengt een gerichte cursus 
voor de Commodore-64 op de 
markt die de cursisten wegwijs 
maakt in tekstverwerken, 


bestandsbeheer, spreadsheets 
en financiéle administratie. 
Uitgangspunt van de cursus is 
dat de deelnemers geen enke- 
le kennis hoeven te hebben 
over programmeren of over de 
computer op zich. Volgens uit- 
gever drs. Ria Kuip bestaat er 
voor het project veel be- 
langstelling, zowel van het be- 
drijfsleven als van particulie- 
ren. Vooral de belangstelling 
van particulieren vindt ze ver- 
heugend omdat de kosten voor 
het pakket, dat bestaat uit tien 
luxe video-opbergdozen met 
daarin steeds een geluidscas- 
sette en een eenvoudig boek- 
je, toch nogal hoog zijn. Niet 
te hoog vindt Ria Kuip, want 
de deelnemer krijgt voor dat 
bedrag niet alleen kennis, 
maar ook een tekstverwerkend 
programma, een spreadsheet 
en een database-programma. 
De cursus is ontwikkeld door 
programmeurs van Malmberg, 
ook een VNU-dochter, die al 
eerder hun sporen op het ge- 
bied van educatieve program- 
matuur hebben verdiend. 

Bij de aanvragers van het 
cursus-pakket gaat het volgens 
Ria Kuip om wat beter opgelei- 
de mensen die het gevoel heb- 
ben dat ze op de hoogte moe- 
ten blijven wat computers be- 
treft. Daarom gaat de cursus 
ook nauwelijks in op het pro- 
grammeren op zich. Hij is be- 
doeld voor mensen die niet in 
eerste instantie zijn geinteres- 
seerd in de werking van een 
computer, maar die er op een 
snellere en efficiéntere manier 
hun werk mee willen doen. Het 
is volgens Ria Kuip voor der- 
gelijke computergebruikers al- 
leen belangrijk dat ze weten 
hoe ze met een spreadsheet of 
een database moeten omgaan. 
Een betrekkelijk nadeel van de 
Intermediair cursus is dat de 
lessen niet op floppy te krijgen 
zijn. Tenminste, nog niet. 
Rondom maart zal de cursus 
als alles goed gaat ook op 
floppy verschijnen. Wie zo 
lang niet wil wachten, krijgt de 
verzekering dat tegen die tijd 
de cursus op cassette kan 
worden ingeruild voor een 
exemplaar op schiff. 
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PROGRAMMA-PAKKET VAN PLUS/4 NADER BEKEKEN 


AANVAARDBARE 
BEPERKINGEN 


Als een van de eerste in Nederland, kreeg 


Jan Jacobs de kans om de ingebouwde 
programmatuur van de PLUS/4 te testen. 


> Het heeft even geduurd, maar Commodo- 


re’s Plus/4 computer begint nu in de win- 
kels te verschijnen. Met de Plus/4, die vo- 
rig jaar tegelijk met de C-16 werd geannon- 
ceerd, wil Commodore niet alleen de ge- 
vorderde hobbyist bedienen, maar ook ge- 
bruikers die op zoek zijn naar een serieuze 
machine waarmee op kleine schaal zakelij- 
ke toepassingen mogelijk zijn. 

Een van de aardigste attracties van de 
Plus/4 is de grote hoeveelheid ingebouwde 
software, maar tot nu toe was nog niet he- 
lemaal zeker hoe deze pakketten er uit 
zouden gaan zien in de Nederlandse ver- 
sies. Dat is inmiddels wel bekend, en daar- 
om bekijkt Commodore Dossier de vier 
pakketten (’3 plus 1’) op hun merites. Jan 
Jacobs knijpt een oogje dicht, ziet wat door 
de vingers, kijkt af en toe de andere kant 
op, en concludeert dat Commodore voor 
weinig geld heel acceptabele software 
biedt. 


PAKETTEN IN ROM 
De Commodore Plus/4, die even boven de 
duizend gulden kost,heeft naast 64 K echt 
(!) beschikbaar RAM-geheugen twee extra 
ROM-chips (leesgeheugen) waarin de ’3 
plus 1’ software is opgeslagen. Software in 
ROM betekent dat deze gebruiksgereed is 
zodra je de machine aanzet, een druk op 
de F1 toets activeert de tekstverwerker, 
vanwaar naar de andere pakketten kan 
worden overgestapt. Een bijkomend voor- 
deel van software in ROM is dat geen kost- 
baar werkgeheugen wordt opgeofferd. En 
Commodore vindt het natuurlijk leuk dat 
kopieéren veel moeilijker wordt. 

Het ’3 plus 1’ pakket bevat een tekstver- 
werker, een spreadsheet (rekenprogram- 
ma), een elektronische kaartenbak en een 
programma om grafieken te maken. Zoals 
de trend dicteert, kun je gegevens tussen 
de verschillende pakketten uitwisselen, 
hoewel er flinke beperkingen zijn. 

Om met de deur in huis te vallen: de tekst- 
verwerker is geen Wordstar, de spread- 
sheet geen Multiplan en de kaartenbak 
haalt het niet bij DBase II. 

Maar elk van de genoemde professionele 
pakketten kost meer dan de Plus/4 inclu- 
sief hardware, dus zo’n vergelijking is niet 
op zijn plaats. Het is misschien aardiger te 
kijken hoe de standaard software van de 


Plus/4 afsteekt tegen vergelijkbare softwa- 
re voor de Commodore 64, en dan moet je 
concluderen dat de kwaliteit van de pro- 
gramma’s — die een winkelwaarde verte- 
genwoordigen van enkele honderden gul- 
dens — toch vrij aardig is. 


TEKSTVERWERKER 
De tekstverwerker lijkt veel op Easyscript, 
en heeft alle functies die je tegenwoordig 
ook bij goedkopere tekstverwerkers mag 
verwachten: zoeken en veranderen, blok- 
operaties, weghalen van tekst en tekens, 
invoegen enz. 

Een paar hinderlijke trekjes van Easyscript 
zijn zelfs verbeterd. Zo kun je, nadat je 
midden in een regel een ’return’ hebt ge- 
gevens, de per ongeluk weggevallen te- 
kens rechts van de cursor weer terugha- 
len. Net als Easyscript kun je met de Plus/4 
tekstverwerker werken met regels die lan- 
ger zijn dan 40 karakters, het scherm is in 
dat geval een venster dat over de tekst ligt, 
en dat je naast van boven naar beneden 
ook van links naar rechts kunt ’scrollen’. 
Vanuit de tekstverwerker kom je door het 
indrukken’van de Commodore-logo/c toet- 
sen in de commando-stand, waarna de in- 
structie ’tc’ volstaat om in de spreadsheet 
te komen. 


REKEN- 
PROGRAMMA 

Het ’3 plus 4’ spreadsheet-programma kan 
850 cellen, verdeeld over 50 rijen en 17 ko- 
lommen bevatten, maar je kan maar twaalf 
rijen en drie kolommen tegelijk in beeld 
krijgen. 

Het spreadsheet is beduidend beter dan 
veel rekenprogramma’s die voor de Com- 
modore 64 op de markt zijn, maar is tege- 
lijk te beperkt om voor serieus zakelijk ge- 
bruik in aanmerking te komen. 

Grote modellen kun je er niet op kwijt, 
maar een aangifte van de inkomstenbe- 
lasting of een eenvoudig budget levert 
geen problemen. Ook hier moet je de 
prestaties van het programma zien in rela- 
tie met de prijs. 

Een sterk punt is overigens dat de schijf- 
commando’s, zoals ’ca’ voor een inventa- 
ris en ‘df’ voor het uitwissen van een 
bestand in alle programma’s gestandaardi- 
seerd zijn. Dat werkt prettig en is wel zo 
overzichtelijk. 

Gegevens uit het rekenprogramma kunnen 
worden getransporteerd naar het grafie- 
ken-programma met het MAP-commando. 
Hiermee kunnen waarden worden omge- 


zet in een blokkengrafiek, die eventueel 
ook weer kan worden overgezet naar de 
tekstverwerker. 

Het grafische programma is ronduit be- 
perkt, omdat maar een enkel type grafiek 
kan worden aangemaakt. Deze functie is 
op veel spreadsheets trouwens standaard 
ingebouwd. Om het grafieken-gedeelte 
een extra programma te noemen, lijkt me 
dus wat overdreven. 


KAARTENBAK 

Het laatste ROM-programma is een elek- 
tronische kaartenbak, die je bijvoorbeeld 
kunt gebruiken om een adressenbestand 
in onder te brengen, dat kan worden ge- 
koppeld met de tekstverwerker. Elk item in 
een bestand mag een maximale lengte 
hebben van 38 tekens, en in een zogehe- 
ten ’record’ mogen maximaal 17 velden 
worden opgenomen. Naast naam, adres, 
postcode, woonplaats, land kun je dus nog 
12 andere categorieen opnemen. Wanneer 
de maximale record-lengte wordt gebruikt 
kun je per disk zo’n 200 items opnemen, 
wat voor adresbestanden vaak voldoende 
zal zijn. 

De informatie in het bestand kan alfabe- 
tisch of op grootte worden gesorteerd, en 
dat met drie categorieén tegelijkertijd. Met 
*review’ kun je het hele bestand doorlopen. 


CONCLUSIE 

Stuk voor stuk zijn de programma’s niet 
spectaculair te noemen, maar in combina- 
tie met de machine en de prijs biedt Com- 
modore toch een aantrekkelijke mogelijk- 
heid voor weinig geld ervaring op te doen 
met zakelijke programma’s. Tenzij het om 
het bijhouden van de administratie van het 
zangkoor van Tietjerksteradeel gaat zullen 
veel toepassingen echter al snel een grote- 
re machine vergen. Toch is de kans groot 
dat tegen die tijd de Plus/4 zichzelf al heeft 
terugverdiend. Daarnaast is de ervaring 
die men opdoet men een kleine, goedkope 
computer een goed startpunt om verant- 
woord een grotere machine te kunnen kie- 
zen. Kleine zelfstandigen zonder compu- 
ter-ervaring zijn dan ook het meest gebaat 
met de aanschaf van een Plus/4. De aan- 
koop is nog aftrekbaar ook! 

Voor pure hobbyisten blijft de Commodore 
64 echter toch een machine met meer mo- 
gelijkneden, en wat belangrijker is, een 
veel groter softwareaanbod. < 
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Computers hebben de neiging op de 
raarste momenten dienst te weigeren. 
Vaak zijn de onverwachte storingen wel te 
verhelpen met een paar zogenaamde har- 
de resets, dat wil zeggen de machine een 
paar keer aan en uit zetten. Helpt dat paar- 
demiddel niet, dan biedt een halve dag 
volstrekte rust wellicht uitkomst. Zowel de 
computer als zijn baas kunnen dan op 
krachten komen. 

We spreken pas van een probleem als de- 
ze eerste maatregelen geen effect sorteren 
en de computer vreemd blijft doen. Het 


motto is nu: rustig blijven en zeker niet in 
paniek raken. 


CONTROLEER DE 
RANDAPPARATUUR 
We beginnen ons onderzoek zonder 
schroevedraaier en controleren of de aan- 
gesloten randapparatuur wellicht de ellen- 
de veroorzaakt. Koppel eerst eens casset- 
terecorder, diskdrives en dergelijke af en 
geef vervolgens een harde reset. Als alle 
randapparaten op één na zijn losgekop- 
peld en de computer functioneert nog niet, 
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dan kan het laatste randapparaat, het 
beeldscherm, de schuldige zijn. Dat is 
makkelijk te controleren door een ander 
scherm aan te sluiten. Als het beeldscherm 
een gewoon tv-toestel is, moet er goed 
worden afgestemd en meestal moeten ook 
de zogenaamde horizontale en verticale 
synchronisatie worden bijgesteld. Knopjes 
om dat te doen, zitten meestal achterop 
monitor of tv-toestel. Natuurlijk overtuigen 
we ons er wel even van dat voor het juiste 
beeldscherm de juiste uitgang op de com- 


puter wordt gebruikt. Je zalde mensende p>» 





Is uw computer wat aR heeft hij koorts, trilt zijn beeldje, iit hij 
of zitten zijn chips wat losjes? Dirk H. Ringenoldus geeft 

tips die uw computer fris en levendig houden of, als hij toch ziek 
wordt, snel voor herstel zorgen. 


ronson coe apea 
apescmnae eng 


1, De toetsenbordstekker. 

2, De uitbreidingspoort, een 24-pens-aansluiting via welke de computer 
met een leger van externe apparaten kan praten. 

3. De cassette-aansluiting. Een 12-pens aansluiting, speciaal geschikt 
voor de Commodore-recorder. 

4, RS-232C-poort. Deze 6-pens-aansluiting zorgt voor communicatie met 
de aanbevolen printers en diskdrives. 

5, Audio/video-aansluiting. 

6, TV-aanstluiting. 

7, Gleuf voor insteekprogramma’s. 

8. Aansluiting voor de netvoeding. 

9. Aan/uit-schakelaar. 

10. Spel-aanstluiting twee. 
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11. Spel-aansluiting één. 

12. De 6566-, of Vic-chip. Zorgt voor de koppeling van de computer 
met tv, of monitor. 

13. De 6510 is de centrale verwerkingseenheid. 

14, De 6581-chip zorgt voor het geluid. 

15. De C64A, ook bekend als 2218, beheert de RS-232C-bus. 

16, 17, 18. Hierin zit al het Basic. 

19, 20. Twee ingewikkelde hulpchips voor de processor die ervoor zor- 
gen dat de machine viekkeloos met veel randapparaten kan samenwer- 
ken waarbij hij reageert op de *boodschappen’ die de randapparaten 
sturen. 

21. Ram, of werkgeheugen. Acht chips van 64 Kbit zorgen voor 64 
Kbyte geheugen. 
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> kost geven die via de monitor-uitgang hun 
huis-tv aan de praat proberen te krijgen, of 
via de aansluiting voor de huis-tv de moni- 
tor. In het laatste geval kan het beeld er be- 
hoorlijk gestoord uitzien zodat men de nei- 
ging heeft de fout bij de computer te 
zoeken. 


Een aardige vuistregel: een computer geeft een 
goed beeld of helemaal niet. Meestal betekent 
een slecht beeld op de tv dat er niets mis is 
met de computer, maar van alles met de tv of 
de verbinding. 


EERST KIJKEN DAN 
PAS SLOPEN 

Laten we er nu van uitgaan dat er inder- 
daad iets aan de computer zelf mankeert. 
Niet meteen naar een reparateur hollen. 
De man is ongetwijfeld geen oplichter, 
maar wat er ook aan de machine man- 
keert, minder dan 75 gulden gaat het niet 
kosten. Zelfs het uit de doos halen kost tijd 
en tijd is geld, nietwaar. 

Het is niet zonder meer aan te raden een 
computer open te maken, maar in bepaal- 
de gevallen bespaart het wel een heleboel 
geld. Doe het in elk geval niet tijdens de 
garantieperiode, want zodra u zelf gaat 
rommelen, bent u de garantie kwijt. Ga in 
elk geval eerst nog eens alles na. Kijk voor- 
al of het rode lichtje brandt als de machine 
wordt ingeschakeld. Is dat niet het geval 
dan ligt dat misschien aan de voeding. 
Laat dat door een kennis met een voltme- 
ter even testen. Treft de voeding geen 
blaam, kijk dan de machine aan de buiten- 
kant helemaal na en maak alle koperen 
baantjes die van buiten zichtbaar zijn met 
een kwastje met tri schoon. Doe hetzelfde 
met stekergaatjes. Wattenstaafjes zijn 


daar goed voor. Kijk wel goed uit dat die tri 
het kunststof niet beschadigt, even uitpro- 
beren op een niet in het oog vallende 
plaats. Daarna kijkt u of alle schroeven en 
schroefjes wel vast zitten en zonodig draait 
u die even met een passende schroeve- 
draaier aan. Na nog eens het apparaat 
goed te hebben nagekeken, proberen we 
het opnieuw aan de praat te krijgen. Een 
vrij grote kans dat hij nu weer perfect 
werkt. 


MMERKWAARDIG 


RITUEEL 

De kans is echter vrijwel even groot dat er 
nog steeds een storing is. Nog geen man 
overboord. U probeert na te gaan met wel- 
ke schroeven de computer opengemaakt 
kan worden. Daar maakt u een platte- 
grondje van dat u elders op tafel legt. Bij 
elk schroefje dat u er uit haalt, zet u op de 
plattegrond een streepje en u plakt er het 
schroefje met een stukje doorzichtig plak- 
band bij vast. Een weggeraakt of verkeerd 
schroefje kan een ramp veroorzaken. 

Zijn alle schroeven er uit, dan moet de 
schroevedraaier weer even terzijde worden 
gelegd. Er volgt nu een merkwaardig ritu- 
eel. Onderdelen van een computer kunnen 
gevoelig zijn voor zogenaamde statische 
elektriciteit. Zorg er dus voor dat u geen 
kunststof kleding draagt en werk niet in 
een te droog vertrek. Voor wie thuis een 
hygrometer heeft, een relatieve luchtvoch- 
tigheid van tenminste 60 procent is ideaal. 
Vertrekken met centrale verwarming zijn al 
vaak droger. Ten slotte dient er een aard- 
leiding in de buurt te zijn. Een centrale ver- 
warmingsbuis of de aardleiding van het 
randgeaarde stopcontact zijn geschikt. U 
raakt nu een metalen uitsteeksel van de 
computer met de ene hand aan en een 
aardleiding met de andere. Tijdens het 
werk herhaalt u dat een paar keer. Baat het 
niet, het schaadt zeker niet. Draag overi- 





gens ook geen pluizige truien en zo want 
stof is uit den boze. Natuurlijk wordt de 
soep niet zo heet gegeten als ze wordt op- 
gediend. Een computer kan best wel wat 
hebben, maar je kunt beter méér voor- 
zorgsmaatregelen nemen dan één te 
weinig. 


KIJKEN MET LOSSE 
HANDEN 

Goed, alle schroeven zijn er uit. Nu moet 
het deksel er af. Dat gaat meestal het 
beste met de computer liggend op zijn toet- 
senbord. Heel voorzichtig kijken of de ran- 
den willen wijken. Niet forceren en zeker 
niet de zaak met een ruk proberen te ver- 
wijderen. Eventueel een schroevedraaier- 
tje gebruiken om voorzichtig te wrikken en 
steeds kijken of er geen draden of aanslui- 
tingen stukgetrokken dreigen te worden. 
Na een heel voorzichtige behandeling heb- 
ben we de deksel er af en ligt de zoge- 
naamde printplaat voor ons. Nog nergens 
aankomen, bekijk de printplaat tot u pre- 
cies weet waar alles zit. Op de printplaat 
van de Commodore zit een zogenaamde 
smeltveiligheid (van ons mag u best zeke- 
ring zeggen). Die zekering kan de oorzaak 
zijn van de storing. Onmiddellijk naar de 
onderdelenzaak en zorgen dat u precies 
dezelfde zekering krijgt. Let wel: SB is niet 
hetzelfde als FB en 1 amp. is ook niet het- 
zelfde als 1,5 amp. De oude er voorzichtig 
uittrekken en de nieuwe er ook voorzichtig 
weer indoen. 

Daarna schroeft u de machine zonder for- 
ceren weer dicht, controleert of alles wel 
vast zit en u sluit hem precies volgens de 
gebruiksaanwijzing weer aan. De kans is 
nu heel groot dat de computer perfect 
werkt. In feite bestaat 80 procent van het 
reparatiewerk uit het openmaken en weer 
dichtmaken van een machine. Een heel 
mysterieus gegeven dat elke reparatie- 
afdeling kent. 


ORIENTEREN OP 

DE KAART 

Met de hierboven beschreven, betrekkelijk 
eenvoudige handelingen, zijn naar onze 
vaste overtuiging heel wat problemen al 
verholpen. Als de computer nog steeds 
weigert, moeten ingrijpender acties wor- 
den ondernomen. Het is nu zaak met over- 
leg en kennis van zaken te werk te gaan. 
Het lokaliseren van een fout gebeurt door 
logisch denken. En het is vooral belangrijk 
om precies te weten hoe de computer in el- 
kaar zit. Natuurlijk zijn er heel wat moge- 
lijkneden om stommiteiten uit te halen. 
Zelfs professionals ontkomen daar niet al- 
tijd aan. 

Computers zien er van binnen eigenlijk al- 
lemaal hetzelfde uit. De hoofdkaart van de 
Commodore 64 is een goed voorbeeld van 
een computer met één kaart. Het heeft wel 
wat weg van een Science Fiction-stad met 
de chips als gebouwen en de koperen ver- 
bindingen aan beide kanten van de kaart 
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© Kijk alles nog eens goed na voor u 
besluit dat er iets stuk is. 


10 BASISREG 


e Gok nooit, zorg altijd dat u precies weet 
wat u doet, doe het anders niet. 


© Gebruik altijd de juiste gereedschappen; 
daartoe kunnen waterpomptang en dergelij- 
ke waarschijnlijk niet worden gerekend. 


© Zorg dat een apparaat niet aan het licht- 
net aangesioten is als dat niet echt hoeft. 


e Ken uw beperkingen, zelfs u weet niet 
alles. 


© Volg eventuele aanwijzingen tot op de let- 
ter en probeer niet een kortere weg naar 
het doe! te nemen. Probeer precies te be- 
grijpen waarom u doet wat u doet. 


e Werk niet te lang zonder pauze, hoe lan- 
ger u werkt, hoe groter de kans op fatale 
fouten. 


e Aan de andere kant: laat nooit een klusje 
half afgemaakt liggen. Zorg er in ieder ge- 
val voor dat tenminste een deel van het 
werk helemaal is afgerond. 


e Maak overvioedig notities op kaarten of 
losse velletjes papier. Dit soort aantekenin- 

, gen hebben een onschatbare waarde als u 
wilt nagaan wat u tot nu toe heeft gedaan 
om een andere aanpak te kiezen. 


 Geef niet toe aan wanhoop. We geven 
toe, het is een hartverscheurend gezicht 
een fijn stuk technologie tot de status van 
presse papier te zien afdalen. Maar het is 
altijd het donkerst vodr zonsondergang, met 
andere woorden: uw machine wordt gerepa- 


als de wegen. De chips op de kaart kunnen 
in verschillende subsystemen gerang- 
schikt worden. Het belangrijkste onderdeel 
is 6én chip, meestal de grootste: de CVE, 
centrale verwerkingseenheid. Bij een mi- 
crocomputer is dat de zogenaamde micro- 
- processor. Meestal heeft hij veertig of zelfs 
meer pennetjes. Het is het echte hart van 
de computer. Bij de Commodore 64 is dat 
de 6510, bij de Vic de 6502. 

Die processor bestuurt de gang van zaken 
in de computer. Hij zit nooit vastgesol- 
deerd maar altijd in een voetje zodat hij 
makkelijk vervangen kan worden. Dat lijkt 
leuk, maar het vervangen van een micro- 
processor is 6én van de weinige bezighe- 
den die beter aan de vakman overgelaten 
kunnen worden. ; 

Het volgende opvallende onderdeel is het 
keurige rijtje chips die samen het geheu- 
gen vormen. Het is te herkennen aan de 
keurig parallel lopende koperen wegen op 
de kaart. Het Ram-geheugen besiaat uit 
identieke chips met allemaal het zelfde 
nummer, laten we zeggen 4116. Die chips 
zitten ook meestal in voetjes en dat is niet 





reerd. En de kans is vrij groot dat u het - 
bent die het doet. 


voor niets want geheugenchips kunnen fa- 
len. De gevorderde doe-het-zelver kan er 
wel het een en ander aan doen, vooral ook 
omdat geheugenchips goedkoop zijn. Voor 
vijf a zes gulden is er al een geheugenchip. 


Een ander belangrijk onderdeel van de 
computer vormen !/O-chips, ofwel het in- 
en uitvoergedeelte. Een soort portier voor 
_de computer. Het zijn er twee of meer met 
nummers als 6821 en 6850 en meestal 
hebben ze veertig pootjes. Deze chips zijn 
door en door betrouwbaar. Grofweg kun je 
zeggen dat wat er ook gebeurt het niet aan 
deze chips ligt. 


Firmware heet het officieel en het is een 
noodzaak voor elke computer. Als we het 
over Rom hebben, bedoelen we met firm- 
ware de in een chip gebakken systeempro- 
grammatuur. Wat in deze geheugens 
staat, kun je gebruiken, maar veranderen 
gaat niet. Een van de Rom’s bevat meestal 
een zogenaamd monitor-, of uitvoe- 


. fingsprogramma dat ‘begrijpt’ wat u de 


compuier wilt laten doen. 





Ook het Basic zit in Rom. Over het alge- 
meen zitten Rom’s in voetjes en ze hebben 
altijd 24 pootijes. 


Over de hele hoofdkaart zitten chips met 
nummers als 74LS00, 74LS74 enzovoorts, 
die als verkeersregelaar optreden. Ze doen 
al het huishoudelijke werk. Ze hebben 
veertien pootjes, soms zestien en soms 
zelfs meer. Ze zitten meestal gesoldeerd. 
Als ze de eerste twintig computer-uren 
hebben doorstaan, is de kans dat er iets 
met ze misgaat bijzonder klein. Wel is het 
mogelijk ze te beschadigen door te romme- 
len met de uitbreidingspoort of een van de 
andere in-/uitgangen. Zelf vervangen kan 
alleen door diegenen die precies weten 
wat er in de computer omgaat. Echte ken- 
ners hebben zelfs geen test nodig, ze we- 
ten onmiddellijk welke chip iets mankeert. 
In principe kunnen amateurs weinig aan 
deze chips herstellen. Dat is vervelend 
want logica-chips als deze kosten vrijwel 
niets. Desondanks kunt u er het beste met 
een kwastje nagellak een rood kruisje op- 
zetten: afblijven! 
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> LOKALISEREN EN 


SIGNALEREN VAN 
STORINGEN 


Nadat we ons georiénteerd hebben op de 
hoofdkaart van de computer, kunnen we 
weer terug naar de praktijk. 

We zetten dus even op een rijtje waar uw 
computer aan kan lijden en hoe u het lijden 
verhelpt. 


Steker in de wandcontactdoos en de 
computer doet toch niets? 


Als u zeker weet dat de wandcontactdoos 
werkt dan is er een smeltzekering doorge- 
brand. Vervangen dus. Maar zorg er voor 
dat er een goede smeltzekering ingaat van 
exact hetzelfde soort als er inzat. Klapt de 
zekering weer door onmiddelijk als u de 
computer aanzet dan is er iets mis met de 
voeding. En daar hebben we het straks 
over. 


De computer doet gek? 


Dat kan duizenden oorzaken hebben. Heel 
vaak is de oorzaak een beroerd snoertie, of 
een mottig stekertje. Beweeg alle steker- 
tjes aan de computer eens voorzichtig. Als 
bij één van de stekertjes de computer nog 
gekker gaat doen, moet de kabel vervan- 
gen of het stekertje gerepareerd worden. 


Na reparatie verdient het aanbeveling ka- 
beltjes en steker voortaan met nog meer 
respect te behandeling. 


U zit op het toetsenbord te rammen en 
plotseling praat de computer niet meer 
met zijn toetsenbord en omgekeerd. 


Weer tienduizenden mogelijke oorzaken, 
maar heel vaak is statische elektriciteit de 
oorzaak. Jammer, maar helaas brengt al- 
leen een koude start uitkomst. Die 27 pagi- 
na’s moeizaam getikte tekst zijn in het 
elektronisch Walhalla opgenomen. Voor- 
taan is het misschien toch verstandiger de 
hele omgeving maar met een antistatisch 
sproeimiddel te bespuiten. Een antistati- 
sche mat doet ook wonderen. En trek die 
acryl trui maar niet meer aan. Wie een keer 
het werk van enkele uren in het niets heeft 
zien verdwijnen, schrijft in het vervolg re- 
gelmatig zijn werk naar schijf of cassette 
weg. Gebeurt zo’n mysterieuze verdwij- 
ning tijdens een onweer, dan kunt u het 
beste de computer uitzetten en een boek 
gaan lezen of het café ingaan. Trek de ste- 
ker er voor de zekerheid maar uit. Na het 
onweer mag u hopen dat de computer het 
nog doet want hij kan het definitief hebben 
opgegeven. Onweer in de buurt: computer 
uit en steker uit het stopcontact. 


U heeft in de computer zitten peuteren . 


omdat de jongste er een stuiver in heeft 
gewurmd, maar nu u de zaak weer in el- 
kaar heeft geschroefd doet de computer 
gek, of hij doet het helemaal niet meer. 





Maak de computer open en kijk, of u niet 
toch ergens een verbinding stuk hebt ge- 
maakt. Als u kunt solderen, doe dat dan. 
Zo niet, laat het door iemand doen die weet 
hoe je aan computers soldeert; dat is na- 
melijk een kunst op zich. 


U heeft iets naar de printer gestuurd en 
nu is er geen beweging meer in de com- 
puter te krijgen. 


De printer staat misschien uit, of hij is elek- 
tronisch losgeschakeld. Helaas, meestal is 
er maar één oplossing: de resetknop en als 
dat niet werkt een koude start. 


De computer heeft voelbaar koorts en hij 
is met geen mogelijkheid aan de praat te 
krijgen. 


Alweer jammer, maar helaas. Zet hem uit 
en probeer uit te vinden waarom de com- 
puter zo heet wordt. Geen ventilatiesleu- 
ven afgedekt of een voeding handig inge- 
bouwd? Na afkoeling kan de computer 
worden aangezet en meestal werkt hij dan 
weer. Als de oorzaak niet is verholpen, 
loopt hij wel weer vast tot de voeding het 
definitief heeft begeven. Voorkomen is dus 
beter dan genezen. 


ONDERHOUD 

Voor we overgaan tot de behandeling van 
echt ingrijpende reparatieklussen, geven 
we eerst nog een paar onderhoudstips. 
Ook al omdat we de hoop hebben daarmee 
het altijd gevaarlijke zelf repareren mis- 
schien te kunnen voorkomen. 


-Rook niet tijdens het gebruik van het toet- 
senbord. 

-Een vioeistof met suiker over het toetsen- 
bord staat bijna gelijk aan moord. 

- Maak alle uitgangen van tijd tot tijd voor- 
zichtig schoon met een kwastje met trich- 
loorethyleen. Wel even op een onschuldig 
hoekje proberen of het de kast of de print 
niet aantast. 

-Zorg ervoor dat regelmatig alle stof uit de 
computer wordt verwijderd. Geen stofzui- 
gertje gebruiken. Een varkensharen kwast 
is het beste, kunststof haren doen meer 
kwaad dan goed. 

-Smeer niets in de computer zelf. Er is daar 
gewoon niets dat gesmeerd moet worden, 
ook het toetsenbord niet. Bij diskdrives kan 
er wel gesmeerd worden, als je maar weet 
hoe. Wie dat niet weet, moet er afblijven. 
Een diskdrive moet trouwens van tijd tot 
tijd worden schoon gemaakt met een reini- 
gingssschijfje. Uw handelaar weet er alles 


van. 


Overigens is het beste onderhoud voor el- 
ke computer: schoonhouden, overal afblij- 
ven en het toetsenbord intensief gebrui- 
ken. Zelfs het slechtste toetsenbord kan 
minstens 1 miljoen aanslagen per toets 
aan. 
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Eigenlijk kunnen we de nu volgende tips 

beter niet geven. We aanvaarden ook geen 

enkele verantwoordelijkheid voor de gevol- 

gen. Maar de waaghaizen, die ondanks de- 

ze waarschuwingen denken dat ze toch 

meer moeten kunnen doen dan hiervoor 
beschreven, geven we een paar tips waar- 

aan ze wat houvast hebben. Waarschijnlijk 
houden we dan de schade beperkt. 

Stel dat u op een gegeven ogenblik minder 
geheugen blijkt te hebben dan aanwezig 

hoort te zijn. U kunt dan gevoeglijk aanne- 
men dat er een Ram-chip stuk is. De reme- 
die: de computer openmaken en hem laten 
werken. NERGENS AANKOMEN. U neemt 
een busje met coldspray en spuit een 
vieugje op de eerste geheugenchip. Het 
kan nu zijn dat er iets gebeurt op het 
scherm. U doet hetzelfde bij alle andere 
geheugenchips. Gebeurt er iets op het 
scherm bij alle chips minus één, twee, drie 
of vier, dan zijn de chips met het afwijken- 
de gedrag stuk. Vervangen dus. Als het 
omgekeerde het geval is, zijn de chips 
waarbij wel wat op het scherm gebeurt 
ziek. Vervangen dus en het nog één keer 
overdoen tot alle chips zich op dezelfde 
manier gedragen. Die coldspray is overi- 
gens niet echt goed voor chips, dus niet te 
vaak en te veel gebruiken. Te grote natuur- 
like koude laat chips ook sneuvelen. 

Als u precies weet wat een chip doet, kunt 
u de coldspray-truc ook op de logica-chips 


proberen. Maar Rom’s en de J 
microprocessor zijn voor 
deze spray taboe. En wie , 2 


morst met dat goedje loopt de kans een 
nieuwe computer te moeten kopen. 
Algemeen gesproken gy ° 
zijn negentig procent 

van de reparaties A 

uit te voeren door mensen met 
een diepgaande kennis van de 
betreffende computer, een volledig 
schema en een bende denk- 
werk. Door denkwerk is een 
fout altijd terug te voeren 

tot een of meer chips en het 
repareren bestaat dan uit het 
vervangen van die chips. 





























Na verloop van jaren kan een computer 
slechter gaan functioneren omdat de poot- 
jes van de chips in de IC-voetjes oxideren. 
Haal één voor é6én alle IC’s er uit, maak de 
voetijes schoon met een fijn koperdraad 
borsteltje, dan even een likje tri en weer te- 
rug in de voetjes. Een karwei voor midde- 
leeuwse monniken, maar de computer kan 
weer jaren feilloos werken tenzij u een paar 
IC’s heeft ‘opgeblazen’ door statische 
elektriciteit, of omdat u met het koper- 
borsteltje twee pooties heeft kortgesloten. 
Dus altijd van die echt geaarde speciale 
handschoenen dragen en nooit meer dan 
één pootie tegelijk schuren. 


We hebben u nu alle kans gegeven om uw 
computer zelf weer aan de praat te krijgen, 
of hem definitief naar de eeuwige elektroni- 
sche jachtvelden te sturen. Mocht er be- 
langstelling voor bestaan, dan komen er 
misschién in de toekomst meer tips om uw 
computer door reparatie te vernielen. Twee 
dingen tot slot: maak nooit een computer in 
zijn garantietijd open en doe de vreemdste 
dingen om statische elektriciteit te mijden. 
Zo blijven u en uw computer gezond.< 
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Commodore Dossier helpt bij ‘de klus van het jaar’ 


BELASTING 


PROGRAMMA | 


Al die i: dat u zuchtend en steunend uw belastingformulier zit in te vullen, kunt u 


ook door 


rengen achter het toetsenbord van uw Commodore. Bijvoorbeeld om het be- 


lastingprogramma in te tikken dat Commodore Dossier u aanbiedt. Edwin Kuné 


Kuné is een van de vooraanstaande 
bestuursleden van de gebruikersvereni- 
ging Hot News en tevens hoofdredacteur 
van het gelijknamige clubblad. In zijn 
spaarzame vrije tijd heeft hij een baan als 


schreef het. 


rijksambtenaar. In die hoedanigheid heeft 
hij dagelijks te maken met belastingen, dus 
hij weet waar hij over praat. Dat blijkt dan 
ook uit dit fraai geschreven en uiterst ge- 
bruiksvriendelijke programma. Een ge- 


bruiksaanwijzing is overbodig. Het pro- 
gramma neem als het ware aan de hand 
door het belastingformulier. En opeens 
is de klus heel wat minder onoverkome- 
lijk. 





BELASTINGPROGRAMMA 

5 xx$=chr$(19):forxx=1to024:xxS=xx$+chr$(17):nextxx<shift>/<spatie>9d 

10 printchr$(14):poke53280,0:poke53281,0:printchr$(166)<shift>/<spatie>05 

20 pokel98,0:gotol000<shift>/<spatie>ld 

100 printchrs$(147):return<shift>/<spatie >bd 

110 printleft$(xx$,abs(int(ve+l)));:printspc(abs(ho));:return<shift>/<spatie>95 
120 ho=peek(209)+256*peek(210)-1024+peek(211)<shift>/<spatie>05 

130 ve=int(ho/40):ho=ho-40*ve:return<shift>/<spatie>15 

200 getin$S:return<shift>/<spatie>fe 

210 getinS:ifin$S=""goto210<shift>/<spatie>ca 

220 return<shift>/<spatie>52 

500 stop: :sho=38:gosubl10:print"=>":fort=ltol00:next<shift>/<spatie>bd 

510 gosub200:ifin$<>""thenreturn<shift>/<spatie>f9 

520 gosubll0O:print" ":fort=ltol00:next:goto500<shift>/<spatie>d3 

1000 a=200:rem inkomstenbelastinag<shift>/<spatie>90 

1010 gosubl00<shift>/<spatie>4d 

1020 ho=8:ve=4:gosubl10:print"Inkomstenbelasting 1984"<shift>/<spatie>52 

1030 ho=11l:ve=8:gosubl1l0:print"Door Edwin Kune’"<shift>/<spatie>c5 

1040 gosub5420<shift>/<spatie>9a 

1050 print"vraag 4a Inkomsten uit arbeid:"<shift>/<spatie>18 

1060 al=O:print:print"Brutoloon/AOW-uitkering ";:inoutal<shift>/<spatie>75 
1070 a2=0:print:print"Ingehouden loonbelasting ";:inputa2<shift>/<spatie>fb 
1080 a3=0:print:print"Ingehouden A.O.W./A.W.W. ";:inputa3<shift>/<spatie>95 
1090 a4=0:print:print"Prive gebruik auto :sinputa4<shift>/<spatie>f2 
1100 a5=0O:print:print"Andere bruto inkomsten :sinputa5<shift>/<spatie>eb 
1110 ifal=Oanda5=0thenl200<shift>/<spatie>d6 

1120 a6=O:print:print"Kosten reizen woning-werk":inputa6<shift>/<spatie>ee 

1130 a7=O:print:print"AF: ontvangen vergoeding ":inputa7<shift>/<spatie>06 

1140 a8=0:a8=a6-a7:if (a8<200) thena8=200<shift>/<spatie>c6 

1150 Lf (a8>3260)thena8=3260<shift>/<spatie>54 
1160 print:print"Aftrekbare reiskosten "sa8<shift>/<spatie>b6a 

1170 a9=0:a9=int(((al+a5)/100*4)/0.014+0.5)*0.0l<shift>/<spatie>02 

1180 if (a9>800)thena9=800<shift>/<spatie>b6é 

1190 if(a9<200)thena9=200<shift>/<spatie>8e 

1200 ifal=Oanda5=0thena9=150<shift>/<spatie>cd 

1210 print:print"4% regeling "sa9<shift>/<spatie>cf 

1220 ve=22:ho=0:gosubll0<shift>/<spatie>59 

1230 print"Of wilt u werkelijke kosten aftrekken ?":gosub210<shift>/<spatie>7a 
1240 ifinS="n"thengosub1l00:gotol310<shift>/<spatie>23 

1250 if (insS<>"j")thenl220<shift>/<spatie>al 

1260 gosubl00:bl=0:print"Werkelijke kosten "s:inputbl<shift>/<spatie>6c 
1270 b2=O:print:print"AF: ontvangen vergoeding ";:inputb2<shift>/<spatie>al 
1280 bl=bl-b2<shift>/<spatie>6c 

1290 if (bl<a9)thenbl=a9<shift>/<spatie>23 
1300 print:print"Aftrekbaar 

L310 ve=10:ho=0:gosubll0<shift>/<spatie>83 
1320 a=0:a=al+a4+a5-a8—-a9-bl<shift>/<spatie>8f 

1330 print"Invullen bij 32 A F “a<shift>/<spatie>27 
1340 gosub5420<shift>/<spatie>b7 
] print"Vraag 5 Winst uit onderneming:"<shift>/<spatie>dd 





Se Se te se Ne 











COMMODORE DOSSIER 71 








";bl:a9=0<shift>/<spatie>3c 
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1500 
T5100 


1540 
1850 


1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
L720 
7 30) 
1740 
1750 
1760 
1770 
1780 
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1830 
1840 
1850 
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1890 
1900 
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1950 
1960 
1970 
1980 
1990 
2000 








<shift>/<spatie>49 


2010 
2020 
2030 


b3=O:print:print"Winst uit onderneming "s:inoputb3<shift>/<spatie>b8 
b4=O:print:print"AF: winst t.a.v. echtgenote ";:inputb4<shift>/<spatie>56 
v4=O:orint:orint"Winst uit ondern. echtgenote";:inputv4<shift>/<spatie>e2 
b=0:b=b3-b4+v4:print:print"Invullen bij 32 B F "b<shift>/<spatie>ac 
gosub5420<shift>/<spatie>f3 

print"Vraag 6 Periodieke uitkeringen"<shift>/<spatie>l3 . 
b5=O0:print:print"Periodieke uitkeringen ";:inputb5<shift>/<spatie>57 
b6=O:print:print"T.a.v. ziekte ed. "s:inputb6<shift>/<spatie>5b 
b7=O0:print:print"T.a.v. studie "s:inputb7<shift>/<spatie>74 
b8=O:print:print"AF: aftrekbare kosten "s:sinputb8<shift>/<spatie>87 
c=0:c=b5+b6+b7-b8:print:print"Invullen bij 32 C f"c<shift>/<spatie>35 
gosub5420<shift>/<spatie>35 

print"Was u gedurende (een gedeelte van) 1984 "<shift>/<spatie>aé 
print"gehuwd (niet duurzaam gescheiden) en "<shift>/<spatie>46 
print"had uw echtgenoot ook inkomsten ?"<shift>/<spatie>1b 
gosub210:ifins="n"thengosubl00:goto2410<shift>/<spatie>9c 
i£(inS<>"4j")thengosub100:gotol480<shift>/<spatie>bl 

print:print"Was u niet het hele jaar gehuwd of "<shift>/<spatie>03 
print"leefde u een gedeelte v/h jaar duur- "<shift>/<spatie>a2 
print"zaam gescheiden vul dan uw persoon- "<shift>/<spatie>ce 
print"lijk arbeidsinkomen in."<shift>/<spatie>a5 

print:print:print"A) inkomsten uit arbeid F "a<shift>/<spatie>cl 
print:print"B) winst uit onderneming F "b<shift>/<spatie>14 
print:print"C) periodieke uitkeringen F "c<shift>/<spatie>ld 

print" "<shift>/<spatie>df 
print:print"Uw persoonlijk inkomen F "atb+c<shift>/<spatie>69 
gosub5420<shift>/<spatie>dc 

print"Inkomen van uw echtgenoot in 1984"<shift>/<spatie>7e 
cl=O:print:print"Brutoloon/AOW-uitkering ";:inputcl<shift>/<spatie>3b 
c2=0:print:print"Ingehouden A.O.W./A.W.W. ";:inputc2<shift>/<spatie>dd 
c3=O0:print:print"Prive gebruik: auto "s;:inputc3<shift>/<spatie>ce 
c4=0:print:print"Andere bruto inkomsten ;:inputc4<shift>/<spatie>23 
ifcl=Oandc4=0thenl1740<shift>/<spatie>12 

c5=O0:print:print"Kosten reizen woning-werk":inputc5<shift>/<spatie>16 
c6=0:print:print"AF: ontvangen vergoeding ":inputc6<shift>/<spatie>ca 
e7=0:c7=c5-c6:if (c7<200)thenc7=200<shift>/<spatie>le 

if (c7>3260)thenc7=3260<shift>/<spatie>90 

print:print"Aftrekbare reiskosten "so7<shift>/<spatie>2f 
c9=0:c9=int(((cl+c4)/100*4)/0.01+0.5)*0.01l<shift>/<spatie>5f 

if (c9>800)thenc9=800<shift>/<spatie>fe 

L£(c9<200) thenc9=200<shift>/<spatie>ca 
ifcl=Oandc4=0thenc9=150<shift>/<spatie>96 

print:print"4% regeling "-c9<shift>/<spatie>8l 
ve=22:ho=0:gosubll0<shift>/<spatie>6l 

print"Of wilt u werkelijke kosten aftrekken ?":gosub210<shift>/<spatie>bf 
ifins="n"thengosub100:gotol890<shift>/<spatie>e9 
if(ins<>"4j")thenl790<shift>/<spatié>52 
gosub100:d1l=0:print"Werkelijke kosten "s:inputdl<shift>/<spatie>a5 
d2=O0:print:print"AF: ontvangen vergoeding ";:inputd2<shift>/<spatie>64 
d2=dl-d2<shift>/<spatie>5l 

if(dl<c9)thendl=c9<shift>/<spatie>6f 

print:print"Aftrekbaar "sd1l:c9=0<shift>/<spatie>60 
gosub5420<shift>/<spatie>dl 

d3=0:print:print"Winst uit onderneming "s:inputd3<shift>/<spatie>a8 
print:print"AF: aan u toe te rekenen "sv4<shift>/<spatie>ld 
print:print"Winst uit ondern. echtgenoot";b4<shift>/<spatie>89 
gosub5420:d5=0:d5=d3-v4+d4<shift>/<spatie>5d 

print"Periodieke uitkeringen"<shift>/<spatie>ec 
d6=0:print:print"Periodieke uitkeringen "s:inputd6<shift>/<spatie>4d 
a7=Orprintsprint"T.a.v. ziekte ed. ; :inputd7<shift>/<spatie>5l 
d8=0:print:print"T.a.v. studie ;:inputd8<shift>/<spatie>7e 
d9=O:print:print"AF: aftrekbare kosten ; :inputd9<shift>/<spatie>9d 
d=0:d=d6+d7+d8-d9<shift>/<spatie>la 

gosub5420<shift>/<spatie>4f 

print:print"Ingeh. premies aow/aww ";c2<shift>/<spatie>06 

















el=O:print:print"Ingeh. premies aaw/akw/awbz ";:inputel<shift>/<spatie>49 
e2=0:print:print"Premies period. uitkeringen sinpute2<shift>/<spatie>64 
e3=0:print:print"Zelfstandigenaftrek ;:inpute3<shift>/<spatie>lec 





e3=elte2+e3+c2<shift>/<spatie>95 

gosub5420<shift>/<spatie>84 

print"Berekening van het persoonlijk arbeids-"<shift>/<spatie>34 
print"inkomen van uw echtgenoot:"<shift>/<spatie>81l 
e7=cl+c4-c9-dl-c7<shift>/<spatie>97 

print:print"Inkomsten uit arbeid "se7<shift>/<spatie>e2 
print:print"Winst uit onderneming ";d5<shift>/<spatie>87 
print:print"Periodieke uitkeringen "sd<shift>/<spatie>ab 
e8=0:e8=e7+d5+d<shift>/<spatie>0d 

print:print"Persoonlijk arbeidsinkomen ":e8<shift>/<spabie>£7 

xl=0:if (e8<atbt+c)thengosub5420:goto2410<shift>/<spatie>le 
gosub5420<shift>/<spatie>e0 

print"Het persoonlijk arbeidsinkomen"<shift>/<spatie>69 

print"van uw échtgenoot is hoger dan dat "<shift>/<spatie>c5 

print"van u.":xl=l<shift>/<spatie>c7 

print"Vul daarom nu de vragen 9 t/m 14 in en"<shift>/<spatie>fl 

print"en sla de vragen 15 t/m 31 over."<shift>/<spatie>64 
gosub5420<shift>/<spatie>24 

print"Vraag 9. Premies Volksverzekeringen:"<shift>/<spatie>a2 
print:print"Ingeh. premies aow/aww "sa3<shift>/<spatie>6c 
f£2=O:print:print"Ingeh. premies awbz/aaw "s:inputf2<shift>/<spatie>2e 
£3=0:f3=a3+f2<shift>/<spatie>64 

print:print"Invullen bij vraag 32 K £"f£3<shift>/<spatie>b2 
print:print<shift>/<spatie>ec 

print:print"Vraag 10. Overige pers. verplichtingen:"<shift>/<spatie>f3 
£4=O:print:print"Premies voor uitkeringen ";:inputf4<shift>/<spatie>72 
print:print"Invullen bij vraag 32 M £"f£4<shift>/<spatie>9Ib 
gosub5420<shift>/<spatie>81l 

print"Vraag 1l. Zelfstandigen aftrek"<shift>/<spatie>9e 
£5=O:print:print"Premies voor uitkeringen ";:inputf5<shift>/<spatie>9b 
print:print"Invullen bij vraag 32 £"£5<shift>/<spatie>ae 
print:print<shift>/<spatie>ld 

print:print"Vraag 13. Te verrekenen verliezen:"<shift>/<spatie>02 
f6=O:print:print"Bedrag van de verliezen "s:inputf6é<shift>/<spatie>d2 
print:print"Invullen bij vraag 32 T f£"f£6<shift>/<spatie>3l 
gosub5420<shift>/<spatie>dl 

goto4170<shift>/<spatie>e2 

print"Vraag 15 Inkomsten uit onderverhuring:"<shift>/<spatie>9l 
gl=O:print:print"Bruto inkomsten "ssinputgl<shift>/<spatie>c7 
g2=O:print:print"AF: aftrekbare kosten ";:inputg2<shift>/<spatie>5f 
g3=gl-g2<shift>/<spatie>ef 

print:print"Invullen bij 32 D £";g3<shift>/<spatie>a3 
gosub5420:print"Vraag 16 Rente:"<shift>/<spatie>8e 
g4=0:print:print"Genoten rente giro "s:sinputg4<shift>/<spatie>2e 
g5=O0:print:print"Genoten rente bank ";:inputda5<shift>/<spatie>2d 
g6=0:print:print"Genoten rente spaartegoeden ";:inputca6<shift>/<spatie>43 
g7=O:print:print"AF: aftrekbare kosten "ss;inputg7<shift>/<spatie>c5 
g8=0:98=94+g5+g6-q7:1if (o8<0)theng8=0<shift>/<spatie>70 
print:print"Invullen bij 32 E £";98<shift>/<spatie>e3 
gosub5420<shift>/<spatie>65 

print"Vraagq 17 Inkomsten uit eigen woning:"<shift>/<spatie>7F£ 
print:print"Had u/uw echtgenoot in 1984 een eigen"<shift>/<spatie>7Ff 
print:print"woning (j/n) ":gosub210<shift>/<spatie>a8 
ifins="n"thengosub100:goto2670<shift>/<spatie>fFf 

if (in$<>"j")thengosubl00:goto2540<shift>/<spatie>54 
hl=0:print:print"Huurwaarde van de woning ";;inputhl<shift>/<spatie>e2 
h2=O:print:print"AF: Rente van schulden ";:inputh2<shift>/<spatie>a6 
h3=0:print:print" P/b voor erfpacht/opstal";:inputh3<shift>/<spatie>a2 
h4=0:print:print" groot onderhoud ";;inputh4<shift>/<spatie>35 
h5=O0:print:print" schilderwerk "s:inputh5<shift>/<spatie>4f 
h6=0:h6=hl-h2-h3-h4-h5<shift>/<spatie>29 
print:print"Invullen bij 32 F £";h6<shift>/<spatie>60 
gosub5420<shift>/<spatie>ed 

print"Vraag 18 Inkomsten uit andere goederen:"<shift>/<spatie>8b 
print:print"Had u/uw echtgenoot in 1984 o/g andere"<shift>/<spatie>c2 
print:print"dan de eigen woning (j/n) ":gosub210<shift>/<spatie>20 
ifin$="n"thengosubl00:goto2800<shift>/<spatie>70 

if (in$<>"j")thengosub100:goto2670<shift>/<spatie>d6é 

i1l=O:print:print"Huur pacht enz. ";:inputil<shift>/<spatie>27 
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i2=0:print:print"AF: Rente van schulden "> sinputi2<shift>/<spatie>24 
13=O0:print:print" P/b voor erfpacht/oostal";:inputi3<shift>/<spatie>24 
i4=0:print:pr ink" onderhoud ed. ;:inputi4<shift>/<spvatie>d9 
i5=O:print:porint" afschrijvingen +:inputid5<shift>/<spatie>d7 
16=0:i6=i1-i2-13-i4-i5<shift>/<spatie>aa 

print: print"Invulléen bij 32 G £";16<shift>/<spatie>eé 
gosub5420<shift>/<spatie>62 

print"Vraag 19 Inkomsten uit effekten:"<shift>/<spatie>2c 
jl=O:print:print"Inkomsten uit obligaties ‘"s:inputjl<shift>/<spatie>79 
j2=O0:print:print"AF: Rente bij aankoop ;:inputj2<shift>/<spatie>es8 
33=0:print:print"Dividenden enz. >:input j3<shift>/<spatie>ee 
j4=O:print:print"Buitenlands dividend ;:input j4<shift>/<spatie>f£9 
35=O:print:print"Andere dividenden ;:inputj5<shift>/<spatie>ad4 
j6=O:print:print"AF: aftrekbare kosten ;:inputj6<shift>/<spatie>2f 
3 7=0:97=31-324+5334+ 744+55-76<shift>/<spatie>9a 

print:print"Invullen bij 32 H £";47<shift>/<spatie>76 
gosub5420<shift>/<spatie>cf 

print"Vraag 20 Overige periodieke uitkeringen:"<shift>/<spatie>a0 
kl=O:print:print"Ontvangen alimentatie ".:inputkl<shift>/<spatie>dc 
print:print"Bijdragen v/d overheid t.a.v."<shift>/<spatie>fd 
k2=O0:print:print"de eigen woning "ssinputk2<shift>/<spatie>08 
k3=O:print:print"Andere uitkeringen "s:inputk3<shift>/<spatie>97 
k4=0:k4=k1+k2+k3<shift>/<spatie>fc 

print:print"Invullen bij 32 1 £";k4<shift>/<spatie>ad 
gosub5420<shift>/<spatie>lf 

print"Vraag 21 Ander inkomen:"<shift>/<spatie>75 

k5=0:print:print"Winst aanmerkelijk belang ".:inputk5<shift>/<spatie>49 
k6=O:print:print"Overige inkomsten’ "s:inputk6<shift>/<spatie>32 
k7=0:k7=k5+k6<shift>/<spatie>6a 

print:print"Invullen bij 32d £";k7<shift>/<spatie>f9 
gosub5420<shift>/<spatie>53 

print"Vraag 22 Premies volksverzekeringen:"<shift>/<spatie>7a 
print:print"Premies aow/aww ingehouden ":a3<shift>/<spatie>68 
11=0:print:print"Premies awbz/aaw en akw "s:inputll<shift>/<spatie>0c 
12=0:print:print"In 1984 op aanslag betaald ";:inputl2<shift>/<spatie>63 
13=0:print:print"AF: In 1984 terugontvangen ";:inputl3<shift>/<spatie>8d 
14=0:14=a34+11412-13:1if£(14<0)thenl4=0<shift>/<spatie>a7 
print:print"Invullen bij 32 K £";14<shift>/<svatie>2b 
gosub5420<shift>/<spatie>a4 

print"Vraag 23 Rente van schulden:"<shift>/<spatie>c2 
15=O:print:print"Rente van schulden "s:inputl5<shift>/<spatie>af 
print:print"Invullen bij 32 L f£";15<shift>/<spatie>75 
gosub5420<shift>/<spatie>cc 

print"Vraag 24 Persoonlijke verplichtingen:"<shift>/<spatie>89 
16=O:print:print"Premies lijfrenten "s:inputl6<shift>/<spatie>92 
17=O:print:print"Premies invaliditeit ;:inputl7<shift>/<spatie>87 
18=O:print:print"Betaalde alimentatie ;:inputl8<shift>/<spatie>8d 
19=O0:print:print"verhaalde bijstand ;:inputl9<shift>/<spatie>e3 
19=19+16+174+18<shift>/<spatie>eb 

print:print"Invullen bij 32M £";19<shift>/<spatie>a8 
gosub5420<shift>/<spatie>le 

print"Vraag 25 Giften:"<shift>/<spatie>54 

ml=O:print:print"Gedane giften "s:inputml<shift>/<spatie>23 
XX=0:xXx=atb+c+g3+q8+h6+i6+47+k4+k7<shift>/<spatie>24 

rem xx is onzuiver inkomen<shift>/<spatie>lc 
m2=O0:m2=int((xx/100)/0.01+0.5)*0.0l<shift>/<spatie>7Ff 
L£(m2<120)thenm2=120<shift>/<spatie>fa 

L£ (ml<m2)thenm2=0:goto3330<shift>/<spatie>38 
m3=0:m3=ml-m2<shift>/<spatie>40 
i£(xx/10<m3)thenm3=int((xx/10)/0.01+0.5)*0.01l<shift>/<snatie>ed 
print:print"AF: 1% onzuiver inkomen "sm2<shift>/<spatie>3b 
print:print"Invullen bij 32 N £";m3<shift>/<spatie>39 
gosub5420:print"Vraag 26 Rentevrijstelling: "<shift>/<spatie>06 
g8=O0:print:print"Genoten rente ";98<shift>/<spatie>00 
print:print"AF: betaalde rente ";15+h2+i2<shift>/<spatie>35 
print" "<shift>/<spatie>a0 
m8=0:m8=08-(15+h2+1i2) :if (m8<0)thenm8=0<shift>/<spatie>82 

if (m8>700)thenm8=700<shift>/<spatie>6b 

print:print"Bedrag v/d vrijstelling "sm8<shift>/<spatie>ad4 
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PRIA print’ LaivibLlen big 32 0 £";m8<shift>/<spatie>63 
gosub5420:print"Vraag 27 Dividendvrijstelling:"<shift>/<spatie>26 
m9=O:print:print"Bedrag v/d vrijstelling "sm9<shift>/<spatie>4b 
print:print"Invullen bij 32 P £";m9<shift>/<spatie>5b 
gosub5420:print"BUITENGEWONE LASTEN :"<shift>/<spatie>8f 
nl=O0:print:print"Uitgaven £ ";sinputnl<shift>/<spatie>50 
ee 

Lf (xx<47938)thenn2=int(((xx/100)*12.7)/0.0140.5)*0. ee ere 
S| gos iets tans begs nuc atest oe et 
goto3530<shift>/<spatie>37 
n2=4650+int(((xx/100)*3)/0.014+0.5)*0.01<shift>/<spatie>99 
L£(xx>108000)thenn2=7900<shift>/<spatie>92 

print:print"AF: drempel FE 8 ";sn2<shift>/<spatie>b8 
printtab(23);" "<shift>/<spatie>fa 

n3=0:n3=nl-n2:if (n3>0)then3580<shift>/<spatie>a2 
print:printtab(10);"GEEN AFTREK MOGELIJK !!":goto3660<shift>/<spatie>e7 
print"Blijft £ "sn3<shift>/<spatie>d7 
ve=10:ho=0:gosubl10<shift>/<spatie>90 
n4=0:print"VERMENIGVULDIGINGSFAKTOR "s;inputn4<shift>/<spatie>sl 
ifn4=1.25o0rn4=1.5then3630<shift>/<spatie>be 

print:print"1.25 OF 1.5 ":goto3590<shift>/<spatie>b7 
n5=0:ve=12:gosubl10:n5=int((n3*n4)/0.01+0.5)*0.01<shift>/<spatie>ab 

Lf (n5>n1)thenn5= nlcshifes/<spatie>48 

print"Aftrekbaar f£ ;n5<shift>/<spatie>6c 
gosub5420<shift>/<spatie>cc 

print"UITGAVEN VOOR LEVENSONDERHOUD :"<shift>/<spatie>of 
print:print"Kinderen jonger dan 27 (geen K.B.) "<shift>/<spatie>94 
n6=O:print:print"Uitgaven £ ";:inputn6é<shift>/<spatie>b7 
print:print"Kinderen ouder dan 27":n8=0<shift>/<spatie>3d 
n7=0:print:print"Uitgaven £ ";:inputn7<shift>/<spatie>a3 
noha Heaenitean ee eae a 

n8=int ((xx/100)*2/0.01+0.5)*0.01:if (n8>800)thenn8= 800<shift>/<spatie>7b 
print:print"AF:2% onzuiver inkomen f " ;n8<shift>/<spatie>ea 

n7=n7-n8: if (n7<0)thenn7=0<shift>/<spatie>dl 
n9=0:n9=n6tn7<shift>/<spatie>lf 

print<shift>/<spatie>2d 

print:print"Aftrekbaar £ ";n9:gosub5420<shift>/<spatie>fl 
gosub1l00:print"UITGAVEN VOOR STUDIE *":print:p2-0<shift>/<spatie>bl 
pl=O:print:print"Uitgaven studie f ";:inputpl<shift>/<spatie>3f 
ae Tea print:print"GEEN AFTREK !!!":goto3870<shift>/<spatie>22 
p2=int ((xx/100)*2/0.01+0.5)*0.01:if(p2>800)thenp2=800<shift>/<spatie>ll 
print"AF: 2% onzuiver inkomen £ ";p2<shift>/<spatie>17 
p3=O0:printtab(26);" ":p3=pl-p2<shift>/<spatie>bb 
L£(p3<0)thenp3=0<shift>/<spatie>29 

print"Aftrekbaar f£ ";p3:gosub5420<shift>/<spatie>b7 
gosubl00:print"UITGAVEN VOOR GEZINSHULP:"<shift>/<spatie>2e 
print:print"Alleen bij 1 oudergezin "<shift>/<spatie>f£4 
p4=0:print:print"Uitgaven £ ";:inputp4<shift>/<spatie>ee 
Pode tines Othenprint:print:goto3960<shift>/<spatie>al 
p5=int((xx/10)/0.01+0.5)*0.01:if (p5>10800) thenp5= 10800<shift>/<spatie>13 
print:print"AF : 10% onz. inkomen f " ;p5<shift>/<spatie>74 
p6=0:printtab(25);" ":p6=p4-p5<shift>/<spatie>ed 
L£(p6<0)thenp6=0<shift>/<spatie>47 

Lf (p6>32400)thenpn6=32400<shift>/<spatie>4f 

print"Aftrekbaar £ ";p6:gosub5420<shift>/<spatie>de 
gosub100:print"RECAPITULATIE BUITENGEWONE LASTEN :"<shift>/<spatie>4l 
printiprint:print"Aftrekbare ziektekosten £";n5<shift>/<spatie>83 
print:print"aftrekbaar levensonderhoud -";n9<shift>/<spatie>be 
print:print"Aftrekbaar voor studie -";p3<shift>/<spatie>6l 
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print:print"Aftrekbare gezinshulp -";p6<shift>/<spatie>79 
printtab(28);" "<shift>/<spatie>99 
p7=0:p7=n54+n9+p3+p6<shift>/<spatie>18 

print"TOTAAL AFTREKBAAR £";p7<shift>/<spatie>58 
ve=18:ho=0:gosubll0:ifp7= Othen4070<shift>/<spatie>bd 

print"U dient specificaties te verstrekken !"<shift>/<spatie>cd 
print:print"Invullen bij 320: £";p7<shift>/<spatie>cd 
gosub5420<shift>/<spatie>71 

print:print"Vraag 29. Zelfstandigenaftrek:"<shift>/<spatie>c0 
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qgl=0:print:print"Bedrag van de aftrek "::inputql<shift>/<spatie>f2 
print:print"Invullen bij vraag 32\R ° £";ql<shift>/<spatie>47 
gosub5420<shift>/<spatie>86 

print:print"Vraag 31. Te verrekenen verliezen:"<shift>/<spatie>0l 
q2=0:print:print"Bedrag te verrekenen "*ssinputq2<shift>/<spatie>al 
print:print"Invullen bij vraag 32 T £";q2<shift>/<spatie>7a 
gosub5420<shift>/<spatie>de 

print"Zo dat waren de vragen."<shift>/<spatie>te 

print:print"Nu volgt een overzicht van blz. 8 van"'<shift>/<spatie>cd 
print:print"de aangifte. Met behulp van dit over-"<shift>/<spatie>b5 
print:print"zicht kunt u de gegevens invullen."<shift>/<spatie>51 
gosub5420<shift>/<spatie>ec 

print"Blz. 8 Berekening belastbaar inkomen:":print<shift>/<spatie>66 
print:print"A) Inkomsten uit arbeid "j;a<shift>/<spatie>8d 

print"B) Winst uit onderneming ";b<shift>/<spatie>40 

print"C) Periodieke uitkering ";c<shift>/<spatie>52 

print"D) Ink. uit onderverhuur ";g3<shift>/<spatie>2c 

print"E) Rente "sg8<shift>/<spatie>47 

print"F) Ink. eigen woning "-h6<shift>/<spatie>2f 

print"G) Ink. andere goederen ".16<shift>/<spatie>2f 

print"H) Ink. uit effecten "s37<shift>/<spatie>54 

print"I) Overige uitkeringen "sk4<shift>/<spatie>4l 

print"J) Ander inkomen ":k7<shift>/<spatie>74 

print” "<shift>/<spatie>63 
pEIHE Hori" Onzuiver inkomen "sxx<shift>/<spatie>26 
gosub5420<shift>/<spatie>60 

print" Onzuiver inkomen ".xx<shift>/<spatie>78 
print:print<shift>/<spatie>39 

ifxl=lthenl4=£3<shift>/<spatie>74 

print"K) Premies Volksverz. ";14<shift>/<spatie>22 

print"L) Rente van schulden "-15<shift>/<spatie>a0 
ifxl=lthenl9=f4<shift>/<spatie>58 

print"M) Persoonl. verplicht. "-19<shift>/<spatie>bb 

print"N) Giften "-m3<shift>/<spatie>d3 

print"O) Rentevrijstelling "sm8<shift>/<spatie>b5 

print"P) Dividendvrijstelling "sm9<shift>/<spatie>el 

print" Q) Buitengew. lasten "-p7<shift>/<spatie>9b 
ifxl=lthengl=f5<shift>/<spatie>00 

print"R) Zelfstandigenaftrek "sgl<shift>/<spatie>7b 
ifxl=ltheng2=f6<shift>/<spatie>fc 

print"T) Te verr. verliezen ".q2<shift>/<spatie>65 

pra" "<shift>/<spatie>16 
yy=0:yy=xx- (14+15+19+m3+m8+m9+p7+ql)-g2<shift>/<spatie>77 
print:print" Belastbaar inkomen "-yy<shift>/<spatie>7a 
gosub5420:tt=0:tl=0<shift>/<spatie>46 

print"Tariefgroep indeling:"<shift>/<spatie>9c 
tt=7662<shift>/<spatie>76 

print:print"Komt u in aanmerking voor: (3/n) "<shift>/<spatie>35 
ve=5:ho=0:gosubl10:print"De alleenverdiener toeslag "-<shift>/<spatie>78 
gosub210:if (in$<>"j")and(in$<>"n")then4580<shift>/<spatie>f£5 
ifinsS="4j"thentt=10298:goto4770<shift>/<spatie>29 
ve=7:gosubll0:print"De bijna alleenverdiener toeslag ";<shift>/<spatie>4de 
gosub210:if (in$<>"j")and(in$<>"n") then4610<shift>/<spatie>le 
ifins="4"thentt=10298:goto4770<shift>/<spatie>c4 
ve=9:gosubl10:print"De alleenstaande toeslag "s<shift>/<spatie>14 
gosub210:if (in$<>"j")and(in$<>"n")then4640<shift>/<spatie>3d 
ifinS="j"thentt=13200<shift>/<spatie>53 

ve=ll:gosubl1l0:print"De alleenstaande ouder-toeslag ";<shift>/<spatie>57 
gosub210:if (in$<>"j")and(in$<>"n")then4670<shift>/<spatie>5c 
ifins="j"thentt=13200<shift>/<spatie>35 
tl=int((xx/4)/0.01+0.5)*0.01<shift>/<spatie>35 
ift(1>4231)thentl=4231<shift>/<spatie>5a 

ve=13:gosub110:print"De aanvullende alleenstaande"<shift>/<spatie>64 
ve=15:gosubl10:print"ouder toeslag "fshift>/<spatiere7 

gosub210:if (in$<>"j")and(in$<>"n")then4720<shift>/<spatie>94 
ifinsS="4"thentt=13200+t1l<shift>/<spatie>26 
ifins="n"thentl=0<shift>/<spatie>9e 

ve=l17:gosubl10:print"De kosten kinderopvang";<shift>/<spatie>9f 
gosub210:if (in$<>"j")and(in$<>"n")then4670<shift>/<spatie>b8 
ifins="j"thentt=tt+250<shift>/<spatie>r7c 

ve=20:gosubll0:print"Uw belastingvrije som bedraagt:";tt<shift>/<spatie>aa 
gosub5420<shift>/<spatie>56 

qq=0:qq=yy-tt<shift>/<spatie>6é7 

rem schijventarief 1984<shift>/<spatie>4c 

if (qq<9430)then4930<shift>/<spatie>64 
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LE (qq>=9430)and(qq<=16461)then4940<shift>/<spatie>52 

if (qq>16461)and(aq<=30444) then4950<shift>/<spatie>d6 

if (qq>30444) and (qq<=42743)then4960<shift>/<spatie>2c 
L£(qq>42743)and(qq<=62187)then4970<shift>/<spatie>36 

if (qq>62187)and(qq<=87146) then4980<shift>/<spatie>39 

if (qa>87146)and(qq<=115052)then4990<shift>/<spatie>3e 
L£(qq>115052)and(qq<=218075)then5000<shift>/<spatie>00 

Lf (qq>218075)then5010<shift>/<spatie>ba 
q4=qq/100*16:goto5020<shift>/<spatie>05 
q3=qq-9430:04=1508+(q3/100*26) :goto5020<shift>/<spatie>82 
q3=qq-16461 :q4=3336+(q3/100*32) :goto5020<shift>/<spatie>ae 
g3=qq-30444:q4=7810+(q3/100*42) :goto5020<shift>/<spatie>97 
q3=qq-42743:q4=12975+(q3/100*52) :goto5020<shift>/<spatie>ab 
G3=qq~-62187:G4=23085+(q3/100*61) :goto5020<shift>/<spatie>bd 
q3=0q-87146:q4=38309+(q3/100*67) :goto5020<shift>/<spatie>ba 
g3=qq-115052:q4=57006+(q3/100*70) :goto5020<shift>/<spatie>71 
q3=qq-218075:q4=129122+(q3/100*72)<shift>/<spatie>e9 
q4=int(q4/0.01+0.5)*0.01<shift>/<spatie>09 

print"Berekening Inkomstenbelasting:"<shift>/<spatie>29 
ve=6:ho=0:gosub110<shift>/<spatie>0c 

print:print"U bent verschuldigd f£"q4<shift>/<spatie>56 
print:print"U heeft betaald -"a2<shift>/<spatie>47 

print" "<shift>/<spatie>64 
rl=0:rl=q4-a2:if (r1<0)then5130<shift>/<spatie>8c 

ifrl=Othenprint"U heeft precies genoeg betaald."<shift>/<spatie>05 
1frl=0then5120<shift>/<spatie>34 

print:print"Te betalen f"rl<shift>/<spatie>le 
gosub5420:goto5140<shift>/<spatie>29 

print:print"Terug te ontvangen f"abs(rl):goto5120<shift>/<spatie>83 
print"Berekening premieheffing volksverz."<shift>/<spatie>3a 
ve=6:ho=0:gosubl10<shift>/<spatie>a5 
ss=0:ss=yyt+(e8-e3)+14+c2<shift>/<spatie>34 

print"Bent u 65+ hoeveel bedroeg uw netto-"<shift>/<spatie>30 
sl=O:print:print"uitkering AOW ";:inputsl<shift>/<spatie>a3 
ss=ss-sl-tl<shift>/<spatie>e7 

print:print"Uw premieinkomen bedraagt f";ss<shift>/<spatie>e0 
s2=0:s2=int((ss*.131)/0.014+0.5)*0.01<shift>/<spatie>c0 

Lf (s2>8233)thens2=8233<shift>/<spatie>5e 
$3=0:s3=14+c2<shift>/<spatie>d3 

gosub5420<shift>/<spatie>e2 

print"Berekening premieheffing volksverz."<shift>/<spatie>ac 
ve=6:ho=0:gosubl10<shift>/<spatie>37 

print:print"U bent verschuldigd f"s2<shift>/<spatie>59 
print:print"U heeft betaald -"s3<shift>/<spatie>17 
print" "sprint<shift>/<spatie>ad 
s4=0:s4=s2-s3<shift>/<spatie>00 

ifs4=O0thenprint"U heeft precies genoeg betaald.":goto5390<shift>/<spatie>eé6 
if(s4<0)thenprint"U krijgt terug aan aow f"abs(s4)<shift>/<spatie>ad 
if(s4<0)then5390<shift>/<spatie>00 

if(s4>0)thenprint"U moet nog betalen aan aow f"s4<shift>/<spatié>79 
s5=0:s5=int((s4*1.1)/0.01+0.5)*0.01<shift>/<spatie>28 

print"En aan aaw/awbz/akw -"s5<shift>/<spatie>f£7 

print" "s:print<shift>/<spatie>f4 
print"Totaal te betalen aow/awbz £"s4+s5<shift>/<spatie>da 


gosub5420:ve=10:ho=18:gosubl10<shift>/<spatie>0de 
print"EINDE"<shift>/<spatie>57 
ve=1l:gosubl10:print" "send<shift>/<spatie>35 

rem subroutine blz. omslaan<shift>/<spatie>85 
in$="";ve=22:ho=38:gosubl10:print"=>";:fort=ltol00:next<shift>/<spatie>cb 
gosub200:if (in$<>"")thengosub100:return<shift>/<spatie>d4 
gosubl10:print" ":fort=1ltol00:next:goto5420<shift>/<spatie>bo 
rem BEE PRAIA KERR E RK RRR RS Cad Pi) Sepa eel 

rem *<shift>/<spatie>ea 

rem edwin kune *<shift>/<spatie>dod 

rem *<shift>/<spatie>9e 

rem commodore hotnews (c) *<shift>/<spatie>c9 

rem *<shift>/<spatie>s8d 

rem postbus 4666 *<shift>/<spatie>ec 

rem *<shift>/<spatie>b7 

rem 1009 ar amsterdam *<shift>/<spatie>f3 

rem *<shift>/<spatie>aé 

rem commodore 64 *<shift>/<spatie>0d 

rem *<shift>/<spatie>5Sa 

rem RK ERNIE ER RAE ER Khe eee Shi FED /<spatLesdd 
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| PROFESSIONELE 
- SOFTWARE 


Practicorp vervaardigt 
| zakelijke en onderwijs 
programma’s voor de 
Commodore 64 en VIC 20 
| Met Nederlandse 
Handleiding 


Practicalc Een komplete 
spreadsheet. Financiéle planning, 
verkoopanalyse enz. 22 
rekenkundige funkties, sorteert, stelt 
H in, 2000 cellen, 
VIC 20 tape 
| VIC 20 Disk 
C 64 tape 
C 64 disk 


f 139, - 
f 169, - 
f 199, - 
f 225, - 


PS: Het in basic programmeerbare 
| spreadsheet. Gebruik eigen 
=| subroutines of de 
| voorgeprogrammeerde modules. 
f 365, - 


Practifile Database manager met 
grote en flexibele capaciteit. 
Compatibel met Practicalc 64. Veel 

*) uitgebreide en professionele 
mogelijkheden f 235, - 
Inventory Een kompleet 

| voorraadsysteem. Veel extra’s zoals: 
leveranciers informatie, bestelorders, 
min/max niveau’s enz. f 149, - 


64 PAK 10 educatieve programma’s. 
Flash cards. Uw commodore 
overhoort u bijv. bij een vreemde 
taal. Speed-read lees en 
schrijfprogramma voor moeilijke 
zinnen en woorden. Met nog 8 
andere programma’s. f 89,50 


} 64 Doctor Test programma voor 
| Disk-drive, datarecorder, 
toetsenbord, monitor, geluid, 
I) joystick. Onmisbaar. Verspil geen 
tiid meer aan hardware problemen. 
f 99,50 


Verkrijgbaar op tape en disk 

Met Nederlandse Handleiding. 
Vraag documentatie en informatie 
van deze beroemde Amerikaanse 
programma’s aan bij de importeur. 


| GPPRACTICORP: 


Ee Ca Cueieet ye 
3076 JT Rotterdam — 
oe ue 010-325743 








(a5 


PROBLEMEN 
MET SPREADSHEET 
EN DATABASE 


De super-listings in het allereerste Commodore Dossier, een spreadsheet en een data- 
base, leverden in een aantal gevallen problemen op. Daarom geven de auteurs 
van beide programma’s in dit artikel wat aanvullende informatie, zodat al uw 


type-werk niet voor niets is geweest. 


SPREADSHEET 

In de listing van dit programma stond er- 
gens het uitroepteken vermeld als een 
toets die een functie zou vervullen. Het uit- 
roepteken heeft inderdaad een functie: 


| men dwingt het programma hiermee om de 


hele spreadsheet door te rekenen zonder 
dat er nieuwe informatie is ingevoerd. Een 
spreadsheet-programma begint altijd links 
boven in de hoek (veld a1) met rekenen en 
stopt links beneden. Indien men nu links 
beneden nieuwe informatie zou invoeren, 
zou het programma niet terugrekenen. Dat 
wordt voorkomen door enige malen de 
toets | in te drukken. 

Het bewaren van de gegevens van de 
spreadsheet op disk leverde in een aantal 
gevallen ook problemen op. Als men een 
bepaalde formule met de naam TEST wil 
opsiaan, wordt die weggezet onder de 
naam $TEST. Daardoor zijn de files op 
schijf makkelijk te onderscheiden van an- 
dere data-bestanden. Bij het teruglezen 
moet het dollarteken dus voor de oorspron- 
kelijke naam worden gezet. 

Bij een aantal lezers gaf het scherm een to- 
taal vertekend beeld. Om dat te voorkomen 
moeten de spaties in de eerste regels van 
het programma, bijvoorbeeld regel 8110, 
precies worden overgenomen. Deze spa- 
ties bepalen namelijke mede de lay-out van 
de spreadsheet. Het aantal spaties kunt u 
het best uitrekenen aan de hand van de re- 
gel die boven of onder de bewuste regel 
staat. 

In de regels 33040 en 10435 stonden te- 
kens die veel lezers niet thuis konden bren- 
gen, respectievelijk een hoedje en een 
slangetje. Dit probleem ontstaat doordat 
de zetmachine geen raad weet met de bij- 
zondere Commodore-tekens. Beide tekens 
staan voor machtsverheffen  (pijltje 
omhoog). 

Een lezer kreeg ten slotte van het onder- 
deel rekenen het optellen niet aan de 
praat. Zelfs het opsturen van een uitdraai 
van de door hem ingetypte versie bracht 
geen uitkomst. Na veel zoeken en heen en 
weer bellen, bleek uiteindelijk dat hij in 
plaats van de plus een SHIFTED PLUS 


schetste problemen. 





had ingetikt. Dit grafische teken komt erg 
veel overeen met een normale plus, waar- 
door de fout moeilijk te achterhalen was. 


DATABASE 

In de listing van dit programma zat een on- 
duidelijkheid, we moeten het toegeven. 
Het bleek onmogelijk om met behulp van 
de spatiebalk door de bladzijden met gege- 
vens heen te bladeren. Dat bladeren is wel 
mogelijk via de functie P. Voor de volledig- 
heid geven we nu een verbeterde versie. 
Regel 32 uit de listing moet worden: 

32 K$="C,P,E,I,N,S,L,H,K,A,?,R,F,D,G, 
’*-GOTO38 

Alle andere problemen die bij de database 
ontstonden, komen voort uit fouten die 
men bij het intikken maakte. 

Vaak werd het Basic-woord PRINT# afge- 
kort met ?#. Wanneer u op deze manier af- 
kort en daarna een listing maakt, lijkt alles 
in orde: er komt inderdaad PRINT# op uw 
beeldscherm te staan. In werkelijkheid 
staan er echter twee dingen, namelijk het 
woord PRINT (equivalent van het vraagte- 
ken) en het symbool #. PRINT# is echter | 
één woord. Als u dat wilt afkorten, moet u 
eerst de letter P invoeren en vervolgens te- 
gelijkertijd SHIFT en de letter R indrukken. 
Een tweede vaak gemaakte fout bij het in- 
voeren, had te maken met het liggende | 
streepje dat op verschillende plaatsen in het 
programma voorkomt. Oorspronkelijk werd 
het gemaakt door tegelijkertijd SHIFT en * in 
tedrukken. Alsueenvande andere liggende 
streepjes op het toetsenbord van uw CBM- 
64 gebruikt, kan dat geen kwaad, als u maar 
consequent hetzelfde streepje gebruikt. 
Eenaantallezers probeerde nueens het ene 
en dan weer het andere streepje. Daarmee 
slijten de toetsen van de computer gelijkma- 
tiger, maar het programma loopt vast. 
Tenslotte waren er gebruikers die lange 
programmaregels (bijvoorbeeld regel 104) 
opbraken. Regels die langer zijn dan 80 te- 
kens moeten worden ingevoerd met afkor- 
tingen voor de Basic-woorden. De handlei- 
ding geeft daarover uitsluitsel. Houdt u bij 
afkorten rekening met de hierboven ge- 





NETSPANNING 





Wijo Koek en René Boot zijn 
Concept Artists, kunstenaars 
dus, met een passie voor 
Commodore-computers. Hun op- 
dracht luidt om in een eigen co- 
lumn het leven van de Commo- 
dore-gebruiker te nee 
men, te versieren en in te kleu- 
ren. Deze keer: hoe verover ik 
de tv op mijn huisgenoten. 


> Aan de huiscomputer zijn in- 
middels vele taken toebedeeld, 
van kinderoppas en belasting- 
consulent tot Chef de Cuisine 
en hoofd van de bewakings- 
dienst. Toepassingen waarbij 
computer en beeldscherm 
overdag en soms ’s nachts in 
de weer zijn. Maar zodra de 
familie zich voor de buis 
schaart, wordt de monitor weer 
tv en maakt je spreadsheet- 
listing plaats voor het Nieuws 
voor Doven en Slechthorenden: 
Een probleem van nu, en ze- 
ker van de toekomst is de zen- 
derkeuze: naar welk program- 
ma kijken we vanavond? Naar 
een quiz-programma op het 
ene net dat de hele familie be- 
halve jij wil zien? Of wordt er 
voor het andere net gekozen 
waar een boeiend populair- 
wetenschappelijk programma 
over creatieve robot-toepassin- 





gen wordt uitgezonden? In bei- 
de gevallen trek jij aan het 
kortste eind, tenzij je handig 
gebruik maakt van je Commo- 
dore computer. 

Omdat technische storingen bij 
omroepen zich nu eenmaal 
zelden voordoen als het jou 
uitkomt, zul je het heft in ei- 
gen handen moeten nemen. 
Simuleer met je Commodore 
een PROGRAMMA-WIJZI- 
GING. 

Voer daartoe het programma 
*NETSPANNING-64’ in, en ver- 
leng een antenne/computer 
schakelaar tot aan je stoel. 
Met dit apparaatje, dat je ge- 
woon in de winkel koopt, kun 
je van televisie- naar compu- 
terbeeld schakelen, en omge- 
keerd. Nadat de presentatrice 
de avondvullende quiz heeft 
aangekondigd en de familie 
breeduit voor de televisie zit 
met koffie, cake en chips, 
schakel je onopvallend over op 
het computer-kanaal. Er ver- 
schijnt dan een mededeling op 
het scherm dat het aangekon- 


‘digde programma is komen te 


vervallen: de quiz gaat niet 
door. Zelfs het meest wantrou- 
wende familielid zal niet ver- 
moeden dat jij en je elektroni- 
sche handlanger hierachter zit- 
ten, omdat behalve de mede- 


deling ook nog het vertrouwde 
omroep-vignet verschijnt. 

Nu zul je zonder al te veel te- 
genwerking kunnen overscha- 
kelen naar jouw favoriete pro- 
gramma. Zo kun je Flight Si- 
mulator inladen voor wat stunt- 
vliegen boven Kennedy Air- 
port. En terwijl je familie 
besluit om er maar een 
yahtzee-avond van te maken, 
installeer jij je in de beste 
stoel. 


HET 
PROGRAMMA 
Het programma wordt voorna- 
melijk in beslag genomen door 
de sprite-data van drie 
omroep-vignetten (regel 
1000-1047). Deze kun je uiter- 
aard zelf aanvullen met, of ver- 
anderen in andere omroep- 
logo’s. Ook de omroep- 
mededeling vanaf regel 140 is 
eenvoudig te veranderen. Als 
je het commando ’RUN’ geeft 
verschijnt na 300 jiffies het 
menu, waaruit jij een van de 
drie gegeven omroepen kunt 
kiezen. Omdat de televisie nog 
op uitzenden staat, moet je dit 
‘blind’ doen. Plaats daartoe de 
Commodore onopvallend on- 
der of naast je stoel. Na de 
menu-keuze druk je op de spa- 
tiebalk waarna het scherm 


wordt leeggemaakt. Daarop 
voer je de ’switch’ uit met je an- 
tenne/computer schakelaar en 
eventueel de afstandsbedie- 
ning. Wanneer de eerste kandi- 
daten aan je familie zijn voor- 
gesteld, valt het beeld weg. 
Worden ze onrustig en willen ze 
de coax-(antenne)-aansluiting 
controleren, dan druk je nog- 
maals op de spatiebalk. Voor 
de familie verschijnt dan het te- 
leurstellende bericht. Wat je nu 
nog nodig hebt, is een beetje 
acteertalent voor een overtui- 
gende ’Jammer, ’t-andere-net- 
dan-maar’-act. Hierbij moet je 
niet overdrijven of te stil zijn. 
Dat trekt alleen maar de aan- 
dacht van een achterdochtige 
zwager. 

Enthousiaste programmeurs 
tenslotte kunnen deze compu- 
tertoepassing perfectioneren. 
Met behulp van de Speech Mo- 
dule kan men bijvoorbeeld 
Dieuwertje Blok laten meedelen 
dat het aangekondigde pro- 
gramma is komen te vervallen. 
En handige VIC-gebruikers 
hebben de mogelijkheid om het 
Nieuws voor Doven en Slech- 
thorenden na te bootsen, van- 
wege de overeenkomstige 
’21-koloms-look.’ De listing van 
NETSPANNING-64 vindt u in 
CD-Aktief, midden in dit blad. < 
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De Nederlandse importeur van Commodore 


heeft een afdeling die speciaal is belast 
met het oplossen van problemen van ge- 


bruikers. Die ’support-groep’ kan uitkomst 


bieden als andere hulpverleners falen. 
Commodore Dossier tekende enkele gou- 
den tips op. 


> Er zijn nogal wat mensen die opbellen om 


gelijk te krijgen,” zegt een medewerker 
van de technische support-groep van Com- 
modore Nederland vanachter zijn werkta- 
fel. ’Dat gaat dan zo: mijnheer, mijn broer 
zegt dat ik een Commodore 64 aan de in- 
gebouwde schijfeenheid van de Commo- 
dore SX kan koppelen, is dat waar? Als wij 
zeggen dat zoiets echt niet kan, zijn som- 
mige mensen behoorlijk verontwaardigd. 
Dan krijgen ze van ons te horen dat ze 
maar bij hun broer te rade moeten gaan.” 
De support-groep van Commodore krijgt 
dagelijks vele vragen over alle mogelijke 
aspecten van Commodore-machines voor- 
gelegd. Vragen waarop meestal direct een 
antwoord kan worden gegeven.. Meestal 
gaat het om gebruikers die door de gebrui- 
kersverenigingen of de dealers niet verder 
kunnen worden geholpen en dringend een 
antwoord op hun brandende vraag zoeken. 
Gebruikers die met een eenvoudige vraag 
Commodore Nederland bellen, worden 
dan ook allereerst terug verwezen naar de 





dealer of naar een van de gebruikergroe- 
pen. Dat is ook de reden waarom de tech- 
nische medewerkers hun naam liever niet 
zien opgenomen in dit artikel. ’’Als de men- 
sen specifiek naar ons vragen, weet de te- 
lefoniste vaak ook niet meer of ze die klant 
moet doorverbinden of niet. Ik vrees dat we 


dan helemal niets anders meer doen dan 
aan de telefoon zitten,” aldus een mede- 
werker. 
Hij wil echter met alle plezier vertellen over 
het soort vragen dat veelvuldig wordt 
gesteld. 


RESET- 
PROBLEEM 

”Een goed voorbeeld van een vraag waar 
we op het moment letterlijk mee worden 
bestookt, betreft de reset-knop. Je weet 
dat de Commodore 64 standaard niet is uit- 
gerust met een zo’n knop, terwijl dat toch 
een handige voorziening is. Nu zijn er ver- 
schillende oplossingen voor dat gemis in 
de handel. Je kunt een reset-knop aanslui- 
ten via de uitbreidingspoort of via de serié- 
le bus. In het laatste geval bestaat de 
reset-knop uit een plug en een drukknop. 
Maar nu komt het! Sinds enige tijd is de se- 
riéle bus van de Commodore zodanig ver- 
anderd dat een reset alleen nog maar naar 
buiten kan gaan, naar een randapparaat. 
Dat is trouwens ook zo bij de Plus/4 en 
C-16. Een randapparaat kan nu dus ook 


AAN 
RE 


IN HELPEN) 


geen reset-puls meer genereren voor de 


computer zelf. Daarvoor zijn enkele goede 
redenen. Het bleek bijvoorbeeld dat in- en 
uitschakelen van randapparaten als disk- 
drives wel eens resulteerden in een vastlo- 
pende computer. Dat kan dus nu niet 
meer. Maar daarmee zijn de aparte reset- 
knoppen die je voor de 64 kunt kopen, al- 
thans de uitvoeringen die je in de seriéle 
bus moet stoppen, eigenlijk waardeloos 
geworden.”’ 


TRAGE 

SPELPOOK 

”Een andere vraag die voortdurend terug 
komt, behelst de foutieve werking van de 
poort voor spelpook 1, dat is register 
56320. Ik weet niet of je het wel eens hebt 
uitgeprobeerd, maar met die aansluiting is 
inderdaad iets vreemds aan de hand. Als je 
de pook naar links zet, loopt een Basic- 
programma maar half zo snel als met de 
pook in de rechterstand. ‘De machine is 
kapot’ hoor je dan van de mensen aan de 
telefoon. Maar er is iets heel anders aan de 
hand. De spelpook staat parallel gescha- 
keld met het toetsenbord. En de linkse 
stand van de spelpook correspondeert toe- 
vallig met een toets die er voor zorgt dat 
het beeld langzamer wordt volgeschreven. 
Rechts is er niets aan de hand. Voor dit 
probleempje bestaat een heel eenvoudige 
oplossing: je moet gewoon met een POKE- 
instructie het toetsenbord uitschakelen als 
de spelpook in gebruik is.” 

Heel wat van de vragen worden alleen 
maar gesteld omdat de mensen verzuimen 
de gebruiksaanwijzing bij de verschillende 
apparaten te lezen. 

"Neem bijvoorbeeld eens zoiets eenvou- 
digs als het formatteren van een schijf die 
je de eerste keer gebruikt. Het lijkt erg voor 
de hand te liggen en het staat ook uitge- 
breid in de handleiding van de schijfeen- 
heid. Maar als je die niet leest, houdt na- 
tuurlijk alles op.” 


CONTACT- 
GESTOORD 

Een voortdurende bron van technische 
vragen vormt het aansluiten van allerlei 
randapparaten op de contactueel nogal ei- 
genzinnige Commodore-computers. Om- 
dat over dit onderwerp zoveel vragen bin- 


nenkwamen, heeft een medewerker vande > 
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pm technische groep nu een memo geschre- 


ven dat aan de vragenstellers wordt toe- 
gestuurd. Dat is geen bemoedigende lec- 
tuur. Zo schrijft men bijvoorbeeld over het 
aansluiten van een RS-232 apparaat op de 
Commodore: 

"Op dit moment is vaak de enige manier 
om een verbinding te maken, het bij elkaar 
krijgen van het volgende: 


@ De gegevens en de schematuur van 
de interface in de afdrukker 

@ De werking van de programmatuur 
van zowel de printer als de computer 
@ Eventueel een oscilloscoop (en de 
kennis om die te gebruiken) 

@ Verbindingskabels, connectoren en 
dergelijke 

@ Geduld en verbeeldingskracht 

@ Tot slot, veel ervaring 


Vooral het verkrijgen van de informatie 
over de koppeling zelf, zoals die in de prin- 
ter is ingebouwd en de gegevens over de 
communicatie en specifieke codes is vaak 
moeilijk.” 

”Het is soms echt een ramp,” verzucht 
men bij Commodore. ’’Van een standaard 
is eigenlijk geen sprake wanneer het om 
RS-232 gaat. Wij adviseren dan ook ie- 
dereen met klem alle apparatuur, vooral 
printers, vooraf in de computershop uit te 
proberen. Vaak wordt tegen de mensen 


naar Commodore bellen. Maar wij kunnen 
in de meeste gevallen ook niets doen als 
we niets van de apparatuur weten. En het 
is nu eenmaal onmogelijk dit soort gevallen 
individueel te gaan bekijken; dan doen we 
de hele dag niets anders.” 


SLORDIG 

Een andere tip zal voor de meeste lezers 
van dit blad te laat komen. Bij de 1541 disk- 
drive wordt een test-schijf geleverd die 
een programma bevat om de schijfeenheid 
te testen. Het draaien van dit programma 
heeft tot gevolg dat de boel hopeloos vast- 
loopt. Wanneer dit programma wordt ’ge- 
list’ en in regel 215 een VERIFY comman- 
do wordt ingevoegd, zijn de problemen ver- 
holpen. ’’Slordig,”’ geeft men onomwon- 
den toe op de Amsterdamse Kabelweg 
waar Commodore Nederland is gevestigd. 


Sommige vragen die de technici worden 
voorgelegd, lijken in eerste instantie vrijwel 
onoplosbaar. Een berucht geval dat men 
zich nog haarzuiver weet te herinneren, 
behelst een computer die slechts af en toe 
op hol sloeg. Met de apparatuur was niets 
aan de hand, zo bleek bij herhaalde contro- 
les. Een en ander kon pas worden opgelost 
door de klant te suggereren zijn elektrische 
installatie eens grondig te laten nazien. 
Toen bleek dat men in het nieuwbouwhuis 
van de klant een foutje had gemaakt met 


door ’resette’ het aanzetten van de wasma- 
chine de computer af en toe. Met de nieu- 
were machines zou zoiets trouwens niet 
meer mogelijk zijn. 

Over het algemeen is men bij Commodore 
redelijk tevreden over de wijze waarop de 
dealers en de gebruikersgroepen de begin- 
nende computer-bezitters op weg helpen. 
Vragen als ‘hoe kan ik de kleur van het 
beeldscherm veranderen’ horen volgens 
de technici duidelijk niet thuis bij de 
support-groep. We kunnen gewoon niet 
voor al die tienduizenden Commodore- 
bezitters als privé-leraar gaan optreden.”’ 
Maar voor alle serieuze vragen die dealer 
of club niet kunnen opgelossen, mogen 
Commodore-gebruikers een beroep doen 
op de support-groep. 

Voor één bepaalde categorie wil een mede- 
werker echter beslist een uitzondering ma- 
ken: ’Wij gaan natuurlijk niet vertellen hoe 
je spelletjes moet kraken. Het is ongeloof- 
lijk, maar wij krijgen toch nog regelmatig te- 
lefoontjes van mensen die vastlopen bij het 
illegaal kopieren van spelletjes en ons dan 
maar bellen om ze verder te helpen. Dat kan 
natuurlijk niet.’ Hij voegt daar evenwel 
lachend aan toe: ’’Natuurlijk weten we wel 
hoe het moet, anders zouden we ons vak 
niet verstaan. Maar wij bekijken een beveili- 
ging meer als een curiositeit en om te con- 
troleren of de software die in Nederland 
door Commodore op de markt wordt ge- 


gezegd: als het niet goed gaat, kunt u altijd het aarden van het elektriciteitsnet. Daar- bracht, niet al te eenvoudig te kraken is.” < 
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